Mercurial > emacs
comparison lisp/cus-edit.el @ 22348:86cb09249796
(customize-group-other-window): Fix previous change.
| author | Karl Heuer <kwzh@gnu.org> |
|---|---|
| date | Thu, 04 Jun 1998 06:07:39 +0000 |
| parents | 7ad747c6c5a9 |
| children | 2649d061d370 |
comparison
equal
deleted
inserted
replaced
| 22347:f53740d7d40d | 22348:86cb09249796 |
|---|---|
| 851 (custom-load-symbol group)) | 851 (custom-load-symbol group)) |
| 852 (let ((name (format "*Customize Group: %s*" | 852 (let ((name (format "*Customize Group: %s*" |
| 853 (custom-unlispify-tag-name group)))) | 853 (custom-unlispify-tag-name group)))) |
| 854 (if (get-buffer name) | 854 (if (get-buffer name) |
| 855 (let ((window (selected-window))) | 855 (let ((window (selected-window))) |
| 856 (pop-to-buffer-other-window name) | 856 (pop-to-buffer name) |
| 857 (select-window window)) | 857 (select-window window)) |
| 858 (custom-buffer-create-other-window | 858 (custom-buffer-create-other-window |
| 859 (list (list group 'custom-group)) | 859 (list (list group 'custom-group)) |
| 860 name | 860 name |
| 861 (concat " for group " | 861 (concat " for group " |