diff options
| author | Stefan Monnier | 2005-10-24 16:43:03 +0000 |
|---|---|---|
| committer | Stefan Monnier | 2005-10-24 16:43:03 +0000 |
| commit | fd8e7a802c77d15b147b9e20592270db34778728 (patch) | |
| tree | 03c31f48f1a2b0f72ef1c3d4af4078ef782ba176 | |
| parent | f12126f8d1b861df60f070b5ad5a531510848ddb (diff) | |
| download | emacs-fd8e7a802c77d15b147b9e20592270db34778728.tar.gz emacs-fd8e7a802c77d15b147b9e20592270db34778728.zip | |
(defimage): Add `doc-string' declaration.
| -rw-r--r-- | lisp/image.el | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/image.el b/lisp/image.el index d9120b9bd32..87102dd34e4 100644 --- a/lisp/image.el +++ b/lisp/image.el | |||
| @@ -430,10 +430,11 @@ Example: | |||
| 430 | 430 | ||
| 431 | (defimage test-image ((:type xpm :file \"~/test1.xpm\") | 431 | (defimage test-image ((:type xpm :file \"~/test1.xpm\") |
| 432 | (:type xbm :file \"~/test1.xbm\")))" | 432 | (:type xbm :file \"~/test1.xbm\")))" |
| 433 | (declare (doc-string 3)) | ||
| 433 | `(defvar ,symbol (find-image ',specs) ,doc)) | 434 | `(defvar ,symbol (find-image ',specs) ,doc)) |
| 434 | 435 | ||
| 435 | 436 | ||
| 436 | (provide 'image) | 437 | (provide 'image) |
| 437 | 438 | ||
| 438 | ;;; arch-tag: 8e76a07b-eb48-4f3e-a7a0-1a7ba9f096b3 | 439 | ;; arch-tag: 8e76a07b-eb48-4f3e-a7a0-1a7ba9f096b3 |
| 439 | ;;; image.el ends here | 440 | ;;; image.el ends here |