From: Dmitry Kalyanov <Kalyanov.Dmitry@gmail.com>
Date: Sat, 12 Sep 2009 18:59:18 +0000 (+0400)
Subject: Write GStrv type as a 'list of string' in doc/skeleton
X-Git-Url: http://repo.macrolet.net/gitweb/?a=commitdiff_plain;h=060e4ab1177a5f5180f25e843931067620bd41c7;p=cl-gtk2.git

Write GStrv type as a 'list of string' in doc/skeleton
---

diff --git a/doc/skeleton.lisp b/doc/skeleton.lisp
index 9b110e3..0699720 100644
--- a/doc/skeleton.lisp
+++ b/doc/skeleton.lisp
@@ -198,6 +198,7 @@
 (defun type-string-f (type)
   (let ((l (ensure-list type)))
     (case (first l)
+      (glib:gstrv "list of @code{string}")
       ((:string glib:g-string) "@code{string}")
       ((:int :uint :long :ulong :char :uchar :int64 :uint64) "@code{integer}")
       ((:boolean :bool) "@code{boolean}")
@@ -213,6 +214,7 @@
 
 (defun type-string-s (type)
   (cond
+    ((g-type= type "GStrv") "list of @code{string}")
     ((g-type= type +g-type-string+) "@code{string}")
     ((g-type= type +g-type-boolean+) "@code{boolean}")
     ((g-type= type +g-type-float+) "@code{single-float}")