summaryrefslogtreecommitdiff
path: root/lisp/custom.el
diff options
context:
space:
mode:
authorRichard M. Stallman <rms@gnu.org>1996-03-27 00:01:14 +0000
committerRichard M. Stallman <rms@gnu.org>1996-03-27 00:01:14 +0000
commitd0cb3f601055fcd341767831043d707ca8c8215f (patch)
treefc044e6b212d9e083471e58019be48ddd2311a0b /lisp/custom.el
parent11e314fa730ce41891df5ad2a9777cbeb0a8ed4e (diff)
downloademacs-d0cb3f601055fcd341767831043d707ca8c8215f.tar.gz
(custom:asis): Renamed from custom-asis.
Diffstat (limited to 'lisp/custom.el')
-rw-r--r--lisp/custom.el12
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 @@
;;; custom.el --- User friendly customization support.
-;; Copyright (C) 1995 Free Software Foundation, Inc.
+;; Copyright (C) 1995, 1996 Free Software Foundation, Inc.
;; Author: Per Abrahamsen <abraham@iesd.auc.dk>
;; Keywords: help
@@ -524,7 +524,7 @@ hierarchy the new entry should be added. CUSTOM is the entry to add."
(default . nil))
((type . const)
(tag . "Def")
- (default . custom-asis))))
+ (default . custom:asis))))
(choice (type . default)
;; See `custom-match'.
(query . custom-choice-query)
@@ -632,16 +632,16 @@ Select the properties you want this face to have.")
(type . string))
"\n"
((tag . "Bold")
- (default . custom-asis)
+ (default . custom:asis)
(type . triggle))
" "
((tag . "Italic")
- (default . custom-asis)
+ (default . custom:asis)
(type . triggle))
" "
((tag . "Underline")
(hidden . t)
- (default . custom-asis)
+ (default . custom:asis)
(type . triggle)))
(default . (custom-face-lookup "default" "default" "default"
nil nil nil))
@@ -733,7 +733,7 @@ Entries in this list take precedence over `custom-type-properties'.")
(defconst custom-invalid '__invalid__
"Special value representing an invalid field.")
-(defconst custom-asis 'custom-asis)
+(defconst custom:asis 'custom:asis)
;; Bad, ugly, and horrible kludge.
(defun custom-property (custom property)