(mode-line-position): Add buffer size indicator.

80108537 · Lute Kamstra · cf045f9a · 80108537
Commit 80108537 authored Sep 08, 2003 by Lute Kamstra
Hide whitespace changes
Inline Side-by-side

Showing with 2 additions and 0 deletions

lisp/bindings.el lisp/bindings.el +2 -0

No files found.
--- a/lisp/bindings.el
+++ b/lisp/bindings.el
@@ -312,6 +312,8 @@ Keymap to display on minor modes.")

  (setq-default mode-line-position
    `((-3 . ,(propertize "%p" 'help-echo help-echo))
+      (size-indication-mode 
+       (8 ,(propertize " of %I" 'help-echo help-echo)))
      (line-number-mode
       ((column-number-mode
 	 (10 ,(propertize " (%l,%c)" 'help-echo help-echo))