Mercurial > hg > xemacs-beta

diff lisp/packages/pending-del.el @ 175:2d532a89d707 r20-3b14

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r20-3b14
author cvs
date Mon, 13 Aug 2007 09:50:14 +0200
parents 8eaf7971accc
children 489f57a838ef
line wrap: on
line diff
--- a/lisp/packages/pending-del.el	Mon Aug 13 09:49:11 2007 +0200
+++ b/lisp/packages/pending-del.el	Mon Aug 13 09:50:14 2007 +0200
@@ -4,7 +4,7 @@
 
 ;; Author: Matthieu Devin <devin@lucid.com>, 14 Jul 92.
 ;; Maintainer: Hrvoje Niksic <hniksic@srce.hr>
-;; Version 2.1
+;; Version 2.2
 
 ;; This file is part of XEmacs.
 
@@ -40,7 +40,11 @@
   "Non-nil when Pending Delete mode is enabled.
 In Pending Delete mode, typed text replaces the selected region.")
 
-(add-minor-mode 'pending-delete-mode " PenDel")
+(defcustom pending-delete-modeline-string " PenDel"
+  "*String to display in the modeline when Pending Delete mode is active."
+  :type 'string)
+
+(add-minor-mode 'pending-delete-mode 'pending-delete-modeline-string)
 
 
 (defun pending-delete-active-region (&optional killp)