diff options
| author | Richard M. Stallman | 1996-03-27 00:01:14 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 1996-03-27 00:01:14 +0000 |
| commit | d0cb3f601055fcd341767831043d707ca8c8215f (patch) | |
| tree | fc044e6b212d9e083471e58019be48ddd2311a0b | |
| parent | 11e314fa730ce41891df5ad2a9777cbeb0a8ed4e (diff) | |
| download | emacs-d0cb3f601055fcd341767831043d707ca8c8215f.tar.gz emacs-d0cb3f601055fcd341767831043d707ca8c8215f.zip | |
(custom:asis): Renamed from custom-asis.
| -rw-r--r-- | lisp/custom.el | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/lisp/custom.el b/lisp/custom.el index 78b2323dd87..e9657538ecf 100644 --- a/lisp/custom.el +++ b/lisp/custom.el | |||
| @@ -1,6 +1,6 @@ | |||
| 1 | ;;; custom.el --- User friendly customization support. | 1 | ;;; custom.el --- User friendly customization support. |
| 2 | 2 | ||
| 3 | ;; Copyright (C) 1995 Free Software Foundation, Inc. | 3 | ;; Copyright (C) 1995, 1996 Free Software Foundation, Inc. |
| 4 | 4 | ||
| 5 | ;; Author: Per Abrahamsen <abraham@iesd.auc.dk> | 5 | ;; Author: Per Abrahamsen <abraham@iesd.auc.dk> |
| 6 | ;; Keywords: help | 6 | ;; Keywords: help |
| @@ -524,7 +524,7 @@ hierarchy the new entry should be added. CUSTOM is the entry to add." | |||
| 524 | (default . nil)) | 524 | (default . nil)) |
| 525 | ((type . const) | 525 | ((type . const) |
| 526 | (tag . "Def") | 526 | (tag . "Def") |
| 527 | (default . custom-asis)))) | 527 | (default . custom:asis)))) |
| 528 | (choice (type . default) | 528 | (choice (type . default) |
| 529 | ;; See `custom-match'. | 529 | ;; See `custom-match'. |
| 530 | (query . custom-choice-query) | 530 | (query . custom-choice-query) |
| @@ -632,16 +632,16 @@ Select the properties you want this face to have.") | |||
| 632 | (type . string)) | 632 | (type . string)) |
| 633 | "\n" | 633 | "\n" |
| 634 | ((tag . "Bold") | 634 | ((tag . "Bold") |
| 635 | (default . custom-asis) | 635 | (default . custom:asis) |
| 636 | (type . triggle)) | 636 | (type . triggle)) |
| 637 | " " | 637 | " " |
| 638 | ((tag . "Italic") | 638 | ((tag . "Italic") |
| 639 | (default . custom-asis) | 639 | (default . custom:asis) |
| 640 | (type . triggle)) | 640 | (type . triggle)) |
| 641 | " " | 641 | " " |
| 642 | ((tag . "Underline") | 642 | ((tag . "Underline") |
| 643 | (hidden . t) | 643 | (hidden . t) |
| 644 | (default . custom-asis) | 644 | (default . custom:asis) |
| 645 | (type . triggle))) | 645 | (type . triggle))) |
| 646 | (default . (custom-face-lookup "default" "default" "default" | 646 | (default . (custom-face-lookup "default" "default" "default" |
| 647 | nil nil nil)) | 647 | nil nil nil)) |
| @@ -733,7 +733,7 @@ Entries in this list take precedence over `custom-type-properties'.") | |||
| 733 | (defconst custom-invalid '__invalid__ | 733 | (defconst custom-invalid '__invalid__ |
| 734 | "Special value representing an invalid field.") | 734 | "Special value representing an invalid field.") |
| 735 | 735 | ||
| 736 | (defconst custom-asis 'custom-asis) | 736 | (defconst custom:asis 'custom:asis) |
| 737 | ;; Bad, ugly, and horrible kludge. | 737 | ;; Bad, ugly, and horrible kludge. |
| 738 | 738 | ||
| 739 | (defun custom-property (custom property) | 739 | (defun custom-property (custom property) |