Mercurial > hg > xemacs-beta

diff lisp/winnt.el @ 265:8efd647ea9ca r20-5b31

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r20-5b31
author cvs
date Mon, 13 Aug 2007 10:25:37 +0200
parents d44af0c54775
children 57709be46d1b
line wrap: on
line diff
--- a/lisp/winnt.el	Mon Aug 13 10:24:47 2007 +0200
+++ b/lisp/winnt.el	Mon Aug 13 10:25:37 2007 +0200
@@ -44,14 +44,6 @@
 (define-key global-map [(meta backspace)] 'backward-kill-word)
 (define-key global-map [(control meta backspace)] 'backward-kill-sexp)
 
-(defconst nt-modeline-buffer-type '("%t")
-  "Modeline control for showing buffer type (binary or text).")
-
-(setq-default modeline-format
-  (cons (purecopy "")
-	(cons 'nt-modeline-buffer-type
-	      (cdr modeline-format))))
-
 ;; Ignore case on file-name completion
 (setq completion-ignore-case t)