# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 897452376 0
# Node ID b23a720f3b4fd41b082604a1a948ebd822c637da
# Parent  cb77a5a6a62955e1fed5709ae0abb319dbdf01c8
(other): New widget type.

diff -r cb77a5a6a629 -r b23a720f3b4f lisp/wid-edit.el
--- a/lisp/wid-edit.el	Wed Jun 10 04:13:57 1998 +0000
+++ b/lisp/wid-edit.el	Wed Jun 10 04:19:36 1998 +0000
@@ -2909,6 +2909,17 @@
   :format "%v\n%h"
   :documentation-property 'variable-documentation)
 
+(define-widget 'other 'sexp
+  "Matches any value, but doesn't let the user edit the value.
+This is useful as last item in a `choice' widget.
+You should use this widget type with a default value,
+as in (other DEFAULT) or (other :tag "NAME" DEFAULT).
+If the user selects this alternative, that specifies DEFAULT
+as the value."
+  :tag "Other"
+  :format "%t%n"
+  :value 'other)
+
 (defvar widget-string-prompt-value-history nil
   "History of input to `widget-string-prompt-value'.")