[cells-gtk-cvs] CVS update: root/cells-gtk/display.lisp

[Peter Denno]

Update of /project/cells-gtk/cvsroot/root/cells-gtk
In directory common-lisp.net:/tmp/cvs-serv24903/cells-gtk

Modified Files:
	display.lisp 
Log Message:
One line of documentation
Date: Wed Feb 16 23:18:06 2005
Author: pdenno

Index: root/cells-gtk/display.lisp
diff -u root/cells-gtk/display.lisp:1.2 root/cells-gtk/display.lisp:1.3
--- root/cells-gtk/display.lisp:1.2	Sun Dec  5 07:33:22 2004
+++ root/cells-gtk/display.lisp	Wed Feb 16 23:18:05 2005
@@ -97,6 +97,7 @@
 		    (list (or (filename self) "")))))
 
 (def-c-output stock ((self image))
+  "Set the image of a stock icon"
   (when new-value
     (gtk-image-set-from-stock (id self) (stock-id self) (icon-size-id self))))