# HG changeset patch
# User Dave Love <fx@gnu.org>
# Date 973251094 0
# Node ID 61e62bc5bd7f45fbfdd02935d5f6476d581fdc2c
# Parent  8b3f1e99c11a1d5b38b517f44d0a0803c018c586
(comint-completion-addsuffix): Fix custom type.

diff -r 8b3f1e99c11a -r 61e62bc5bd7f lisp/comint.el
--- a/lisp/comint.el	Fri Nov 03 04:38:41 2000 +0000
+++ b/lisp/comint.el	Fri Nov 03 11:31:34 2000 +0000
@@ -2334,7 +2334,11 @@
 If a cons pair, it should be of the form (DIRSUFFIX . FILESUFFIX) where
 DIRSUFFIX and FILESUFFIX are strings added on unambiguous or exact completion.
 This mirrors the optional behavior of tcsh."
-  :type 'boolean
+  :type '(choice (const :tag "None" nil)
+		 (const :tag "add /" t)
+		 (cons :tag "Suffix pair"
+		       (string :tag "Directory suffix")
+		       (string :tag "File suffix")))
   :group 'comint-completion)
 
 (defcustom comint-completion-recexact nil