(defimage): Add `doc-string' declaration.

fd8e7a80 · Stefan Monnier · f12126f8 · fd8e7a80
Commit fd8e7a80 authored Oct 24, 2005 by Stefan Monnier
Hide whitespace changes
Inline Side-by-side

Showing with 2 additions and 1 deletion

lisp/image.el lisp/image.el +2 -1

No files found.
--- a/lisp/image.el
+++ b/lisp/image.el
@@ -430,10 +430,11 @@ Example:

   (defimage test-image ((:type xpm :file \"~/test1.xpm\")
                         (:type xbm :file \"~/test1.xbm\")))"
+  (declare (doc-string 3))
  `(defvar ,symbol (find-image ',specs) ,doc))


 (provide 'image)

-;;; arch-tag: 8e76a07b-eb48-4f3e-a7a0-1a7ba9f096b3
+;; arch-tag: 8e76a07b-eb48-4f3e-a7a0-1a7ba9f096b3
 ;;; image.el ends here