Mercurial > emacs
comparison lisp/cus-theme.el @ 50287:51b6a93f7e19
(customize-create-theme): Rename from
`custom-theme-create'.
| author | John Paul Wallington <jpw@pobox.com> |
|---|---|
| date | Mon, 24 Mar 2003 06:07:49 +0000 |
| parents | 3803afb52e4f |
| children | 11d27dde6451 |
comparison
equal
deleted
inserted
replaced
| 50286:53cf1a79b0f5 | 50287:51b6a93f7e19 |
|---|---|
| 30 | 30 |
| 31 (eval-when-compile | 31 (eval-when-compile |
| 32 (require 'wid-edit)) | 32 (require 'wid-edit)) |
| 33 | 33 |
| 34 ;;;###autoload | 34 ;;;###autoload |
| 35 (defun custom-theme-create () | 35 (defun customize-create-theme () |
| 36 "Create a custom theme." | 36 "Create a custom theme." |
| 37 (interactive) | 37 (interactive) |
| 38 (if (get-buffer "*New Custom Theme*") | 38 (if (get-buffer "*New Custom Theme*") |
| 39 (kill-buffer "*New Custom Theme*")) | 39 (kill-buffer "*New Custom Theme*")) |
| 40 (switch-to-buffer "*New Custom Theme*") | 40 (switch-to-buffer "*New Custom Theme*") |