From e8087a7609a4a279b6b6cbca947e9d845c760a9e Mon Sep 17 00:00:00 2001 From: Glenn Morris Date: Thu, 1 Dec 2011 17:34:24 -0500 Subject: [PATCH] Fix some em-hist custom types. * lisp/eshell/em-hist.el (eshell-history-file-name, eshell-history-size): Fix custom type. --- lisp/ChangeLog | 1 + lisp/eshell/em-hist.el | 6 ++++-- 2 files changed, 5 insertions(+), 2 deletions(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 4f728dff33d..4659d118789 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -2,6 +2,7 @@ * eshell/em-hist.el (eshell-hist-initialize): Handle eshell-history-size nil and HISTSIZE set or unset. + (eshell-history-file-name, eshell-history-size): Fix custom type. 2011-12-01 Stefan Monnier diff --git a/lisp/eshell/em-hist.el b/lisp/eshell/em-hist.el index 5ae419f7ba9..5e44e541526 100644 --- a/lisp/eshell/em-hist.el +++ b/lisp/eshell/em-hist.el @@ -90,12 +90,14 @@ "If non-nil, name of the file to read/write input history. See also `eshell-read-history' and `eshell-write-history'. If it is nil, Eshell will use the value of HISTFILE." - :type 'file + :type '(choice (const :tag "Use HISTFILE" nil) + file) :group 'eshell-hist) (defcustom eshell-history-size 128 "Size of the input history ring. If nil, use envvar HISTSIZE." - :type 'integer + :type '(choice (const :tag "Use HISTSIZE" nil) + integer) :group 'eshell-hist) (defcustom eshell-hist-ignoredups nil -- 2.39.2