diff options
| author | Markus Rost | 2002-11-14 21:37:10 +0000 |
|---|---|---|
| committer | Markus Rost | 2002-11-14 21:37:10 +0000 |
| commit | 1b527a7e027c5899ae83d5fe53f64a6f2cefdf07 (patch) | |
| tree | 994d07920e45c034ece0f9a05d661de96e73dcdf | |
| parent | 7d941f629b0cd6fb4ee30942010199dd9c8a9037 (diff) | |
| download | emacs-1b527a7e027c5899ae83d5fe53f64a6f2cefdf07.tar.gz emacs-1b527a7e027c5899ae83d5fe53f64a6f2cefdf07.zip | |
(custom-declare-group): Remove unnecessary line of code.
| -rw-r--r-- | lisp/custom.el | 1 |
1 files changed, 0 insertions, 1 deletions
diff --git a/lisp/custom.el b/lisp/custom.el index dcc6bb6f046..2fe7c50c13b 100644 --- a/lisp/custom.el +++ b/lisp/custom.el | |||
| @@ -315,7 +315,6 @@ information." | |||
| 315 | (while members | 315 | (while members |
| 316 | (apply 'custom-add-to-group symbol (car members)) | 316 | (apply 'custom-add-to-group symbol (car members)) |
| 317 | (setq members (cdr members))) | 317 | (setq members (cdr members))) |
| 318 | (put symbol 'custom-group (nconc members (get symbol 'custom-group))) | ||
| 319 | (when doc | 318 | (when doc |
| 320 | ;; This text doesn't get into DOC. | 319 | ;; This text doesn't get into DOC. |
| 321 | (put symbol 'group-documentation (purecopy doc))) | 320 | (put symbol 'group-documentation (purecopy doc))) |