Mercurial > emacs

changeset 22572:b1cba467a906

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(dabbrev-case-fold-search, dabbrev-case-replace, dabbrev-check-other-buffers): Use `other' widget type.
author Andreas Schwab <schwab@suse.de>
date Wed, 24 Jun 1998 08:54:53 +0000
parents 4aebb136294f
children de7033a2c5fe
files lisp/dabbrev.el
diffstat 1 files changed, 5 insertions(+), 5 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/dabbrev.el	Wed Jun 24 08:54:04 1998 +0000
+++ b/lisp/dabbrev.el	Wed Jun 24 08:54:53 1998 +0000
@@ -134,8 +134,8 @@
  if `case-fold-search' is nil.
 Any other non-nil version means case is not significant."
   :type '(choice (const :tag "off" nil)
-		 (const :tag "on" t)
-		 (const :tag "like search" case-fold-search))
+		 (const :tag "like search" case-fold-search)
+		 (other :tag "on" t))
   :group 'dabbrev)
 
 (defcustom dabbrev-upcase-means-case-search nil
@@ -156,8 +156,8 @@
 This variable has an effect only when the value of
 `dabbrev-case-fold-search' specifies to ignore case."
   :type '(choice (const :tag "off" nil)
-		 (const :tag "on" t)
-		 (const :tag "like M-x query-replace" case-replace))
+		 (const :tag "like M-x query-replace" case-replace)
+		 (other :tag "on" t))
   :group 'dabbrev)
 
 (defcustom dabbrev-abbrev-char-regexp nil
@@ -216,7 +216,7 @@
 The default value is t."
   :type '(choice (const :tag "off" nil)
 		 (const :tag "on" t)
-		 (const :tag "ask" other))
+		 (other :tag "ask" other))
   :group 'dabbrev)
 
 ;; I guess setting this to a function that selects all C- or C++-