From cc0a25e146e7c313a6dcdb72daa4a8acd7db674e Mon Sep 17 00:00:00 2001
From: "Richard M. Stallman" <rms@gnu.org>
Date: Wed, 10 Jun 1998 04:19:36 +0000
Subject: [PATCH] (other): New widget type.

---
 lisp/wid-edit.el | 11 +++++++++++
 1 file changed, 11 insertions(+)

diff --git a/lisp/wid-edit.el b/lisp/wid-edit.el
index 3e1979012ba..2c9b6e9ddd5 100644
--- a/lisp/wid-edit.el
+++ b/lisp/wid-edit.el
@@ -2909,6 +2909,17 @@ link for that string."
   :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'.")
 
-- 
2.39.2