Commits

Anonymous committed 915a46f

2002-01-10 John Paul Wallington <jpw@shootybangbang.com>

* pending-del.el (pending-delete-modeline-string): fix custom type.
* pc-select.el (pc-select-modeline-string): fix custom type.

  • Participants
  • Parent commits 943afe3

Comments (0)

Files changed (3)

+2002-01-10  John Paul Wallington  <jpw@shootybangbang.com>
+
+	* pending-del.el (pending-delete-modeline-string): fix custom type.
+	* pc-select.el (pc-select-modeline-string): fix custom type.
+
 2001-05-11  Ben Wing  <ben@xemacs.org>
 
 	* pending-del.el: declare more commands triggering pending deletion.
 ;; when the pc-select minor mode is enabled.
 
 ;;; $Log$
+;;; Revision 1.6  2001/05/09 23:59:24  youngs
+;;; Patch from Sean MacLennan  <seanm@storm.ca>
+;;;
 ;;; Revision 1.5  2000/10/06 09:02:23  youngs
 ;;; Martin's Monster Mega typo patch
 ;;;
   "Local keymap for pc-select mode.")
 
 (defcustom pc-select-modeline-string " PC"
-  "*String to display in the modeline when pc-select mode is active."
-  :type 'string
+  "*String to display in the modeline when pc-select mode is active.
+Set this to nil if you don't want a modeline indicator."
+  :type '(choice string
+		 (const :tag "none" nil))
   :group 'pc-select)
 
 (defvar pc-select-original-keymap (current-global-map)
   :group 'keyboard)
 
 (defcustom pending-delete-modeline-string " PenDel"
-  "*String to display in the modeline when Pending Delete mode is active."
-  :type 'string
+  "*String to display in the modeline when Pending Delete mode is active.
+Set this to nil if you don't want a modeline indicator."
+  :type '(choice string
+		 (const :tag "none" nil))
   :group 'keyboard)
 
 (add-minor-mode 'pending-delete-mode 'pending-delete-modeline-string)