X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=gtk%2Fgtk.markup.lisp;fp=gtk%2Fgtk.markup.lisp;h=0000000000000000000000000000000000000000;hb=6950e782a8e1d7aea44e29cc25ba070d913642b0;hp=b574a9b9e4cb108494bb2228dc66c5eab9aad397;hpb=8ee73448cf7fb0ee832219593e6ffa1eb53e4e45;p=cl-gtk2.git diff --git a/gtk/gtk.markup.lisp b/gtk/gtk.markup.lisp deleted file mode 100644 index b574a9b..0000000 --- a/gtk/gtk.markup.lisp +++ /dev/null @@ -1,11 +0,0 @@ -(in-package :gtk) - -(defcfun |g_markup_escape_text| :string - (raw :string) - (size :int)) - -(defun markup-escape-text (raw) - (cffi:with-foreign-string (s raw) - (|g_markup_escape_text| s (length raw)))) - -(export 'markup-escape-text)