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 " |