diff options
| author | Lute Kamstra | 2005-04-04 08:59:38 +0000 |
|---|---|---|
| committer | Lute Kamstra | 2005-04-04 08:59:38 +0000 |
| commit | 6786cab27226019951ab4247097c98c5cf1c785a (patch) | |
| tree | 05b1052badd806654cf8ff7839cacedbc4be96b3 | |
| parent | b862cd15d072bab0e0adfcdbd1538234f7a976c4 (diff) | |
| download | emacs-6786cab27226019951ab4247097c98c5cf1c785a.tar.gz emacs-6786cab27226019951ab4247097c98c5cf1c785a.zip | |
(iimage): New customization group.
(iimage-mode): Specify :group.
| -rw-r--r-- | lisp/iimage.el | 9 |
1 files changed, 7 insertions, 2 deletions
diff --git a/lisp/iimage.el b/lisp/iimage.el index 9b183ebb01d..32f6aef9abd 100644 --- a/lisp/iimage.el +++ b/lisp/iimage.el | |||
| @@ -1,6 +1,6 @@ | |||
| 1 | ;;; iimage.el --- Inline image minor mode. | 1 | ;;; iimage.el --- Inline image minor mode. |
| 2 | 2 | ||
| 3 | ;; Copyright (C) 2004 Free Software Foundation | 3 | ;; Copyright (C) 2004, 2005 Free Software Foundation |
| 4 | 4 | ||
| 5 | ;; Author: KOSEKI Yoshinori <kose@meadowy.org> | 5 | ;; Author: KOSEKI Yoshinori <kose@meadowy.org> |
| 6 | ;; Maintainer: KOSEKI Yoshinori <kose@meadowy.org> | 6 | ;; Maintainer: KOSEKI Yoshinori <kose@meadowy.org> |
| @@ -51,6 +51,11 @@ | |||
| 51 | (eval-when-compile | 51 | (eval-when-compile |
| 52 | (require 'image-file)) | 52 | (require 'image-file)) |
| 53 | 53 | ||
| 54 | (defgroup iimage nil | ||
| 55 | "Support for inline images." | ||
| 56 | :version "22.1" | ||
| 57 | :group 'image) | ||
| 58 | |||
| 54 | (defconst iimage-version "1.1") | 59 | (defconst iimage-version "1.1") |
| 55 | (defvar iimage-mode nil) | 60 | (defvar iimage-mode nil) |
| 56 | (defvar iimage-mode-map nil) | 61 | (defvar iimage-mode-map nil) |
| @@ -137,7 +142,7 @@ With numeric ARG, display the images if and only if ARG is positive." | |||
| 137 | ;;;###autoload | 142 | ;;;###autoload |
| 138 | (define-minor-mode iimage-mode | 143 | (define-minor-mode iimage-mode |
| 139 | "Toggle inline image minor mode." | 144 | "Toggle inline image minor mode." |
| 140 | nil " iImg" iimage-mode-map | 145 | :group 'iimage :lighter " iImg" :keymap iimage-mode-map |
| 141 | (run-hooks 'iimage-mode-hook) | 146 | (run-hooks 'iimage-mode-hook) |
| 142 | (iimage-mode-buffer iimage-mode)) | 147 | (iimage-mode-buffer iimage-mode)) |
| 143 | 148 | ||