diff options
| author | Glenn Morris | 2007-12-02 18:51:27 +0000 |
|---|---|---|
| committer | Glenn Morris | 2007-12-02 18:51:27 +0000 |
| commit | 5b8178bbea505c34691977477653ffe66cf7d370 (patch) | |
| tree | 0b38ba9f36807fa55e3f1c755293d4084c30b35b | |
| parent | b0a07187c10af2ac905ee79eed8c50c7dd090b12 (diff) | |
| download | emacs-5b8178bbea505c34691977477653ffe66cf7d370.tar.gz emacs-5b8178bbea505c34691977477653ffe66cf7d370.zip | |
(binhex): New custom group.
(binhex-decoder-program, binhex-decoder-switches)
(binhex-use-external): Move to the binhex custom group.
| -rw-r--r-- | lisp/ChangeLog | 12 | ||||
| -rw-r--r-- | lisp/mail/binhex.el | 11 |
2 files changed, 20 insertions, 3 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 1e038f2a86c..c2d0a82932c 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog | |||
| @@ -1,3 +1,15 @@ | |||
| 1 | 2007-12-02 Glenn Morris <rgm@gnu.org> | ||
| 2 | |||
| 3 | * mail/binhex.el: Move here from gnus/. | ||
| 4 | (binhex): New custom group. | ||
| 5 | (binhex-decoder-program, binhex-decoder-switches) | ||
| 6 | (binhex-use-external): Move to the binhex custom group. | ||
| 7 | |||
| 8 | * mail/uudecode.el: Move here from gnus/. | ||
| 9 | (uudecode): New custom group. | ||
| 10 | (uudecode-decoder-program, uudecode-decoder-switches) | ||
| 11 | (uudecode-use-external): Move to the uudecode custom group. | ||
| 12 | |||
| 1 | 2007-12-02 Agustin Martin <agustin.martin@hispalinux.es> | 13 | 2007-12-02 Agustin Martin <agustin.martin@hispalinux.es> |
| 2 | 14 | ||
| 3 | * textmodes/flyspell.el (flyspell-large-region): Explicitly set | 15 | * textmodes/flyspell.el (flyspell-large-region): Explicitly set |
diff --git a/lisp/mail/binhex.el b/lisp/mail/binhex.el index 88f0e20f17c..c1d1316c82e 100644 --- a/lisp/mail/binhex.el +++ b/lisp/mail/binhex.el | |||
| @@ -35,23 +35,28 @@ | |||
| 35 | 'char-int | 35 | 'char-int |
| 36 | 'identity))) | 36 | 'identity))) |
| 37 | 37 | ||
| 38 | (defgroup binhex nil | ||
| 39 | "Decoding of BinHex (binary-to-hexadecimal) data." | ||
| 40 | :group 'mail | ||
| 41 | :group 'news) | ||
| 42 | |||
| 38 | (defcustom binhex-decoder-program "hexbin" | 43 | (defcustom binhex-decoder-program "hexbin" |
| 39 | "*Non-nil value should be a string that names a binhex decoder. | 44 | "*Non-nil value should be a string that names a binhex decoder. |
| 40 | The program should expect to read binhex data on its standard | 45 | The program should expect to read binhex data on its standard |
| 41 | input and write the converted data to its standard output." | 46 | input and write the converted data to its standard output." |
| 42 | :type 'string | 47 | :type 'string |
| 43 | :group 'gnus-extract) | 48 | :group 'binhex) |
| 44 | 49 | ||
| 45 | (defcustom binhex-decoder-switches '("-d") | 50 | (defcustom binhex-decoder-switches '("-d") |
| 46 | "*List of command line flags passed to the command `binhex-decoder-program'." | 51 | "*List of command line flags passed to the command `binhex-decoder-program'." |
| 47 | :group 'gnus-extract | 52 | :group 'binhex |
| 48 | :type '(repeat string)) | 53 | :type '(repeat string)) |
| 49 | 54 | ||
| 50 | (defcustom binhex-use-external | 55 | (defcustom binhex-use-external |
| 51 | (executable-find binhex-decoder-program) | 56 | (executable-find binhex-decoder-program) |
| 52 | "*Use external binhex program." | 57 | "*Use external binhex program." |
| 53 | :version "22.1" | 58 | :version "22.1" |
| 54 | :group 'gnus-extract | 59 | :group 'binhex |
| 55 | :type 'boolean) | 60 | :type 'boolean) |
| 56 | 61 | ||
| 57 | (defconst binhex-alphabet-decoding-alist | 62 | (defconst binhex-alphabet-decoding-alist |