Commit b32d1614 authored by Chong Yidong's avatar Chong Yidong

* ruler-mode.el (ruler--save-header-line-format): Fix typos.

parent c1ef4455
2010-07-01 Chong Yidong <cyd@stupidchicken.com>
* ruler-mode.el (ruler--save-header-line-format): Fix typos.
2010-06-30 Chong Yidong <cyd@stupidchicken.com> 2010-06-30 Chong Yidong <cyd@stupidchicken.com>
* frame.el (make-frame): Add default-frame-alist to the PARAMETERS * frame.el (make-frame): Add default-frame-alist to the PARAMETERS
......
...@@ -557,15 +557,14 @@ Use the command `ruler-mode' to change this variable.") ...@@ -557,15 +557,14 @@ Use the command `ruler-mode' to change this variable.")
(defun ruler--save-header-line-format () (defun ruler--save-header-line-format ()
"Install the header line format for Ruler mode. "Install the header line format for Ruler mode.
Unless if Ruler mode is already enabled, save the old header line Unless Ruler mode is already enabled, save the old header line
format first." format first."
(when enable (when (and (not ruler-mode)
(when (and (not ruler-mode) (local-variable-p 'header-line-format)
(local-variable-p 'header-line-format) (not (local-variable-p 'ruler-mode-header-line-format-old)))
(not (local-variable-p 'ruler-mode-header-line-format-old))) (set (make-local-variable 'ruler-mode-header-line-format-old)
(set (make-local-variable 'ruler-mode-header-line-format-old) header-line-format))
header-line-format)) (setq header-line-format ruler-mode-header-line-format))
(setq header-line-format ruler-mode-header-line-format)))
;;;###autoload ;;;###autoload
(define-minor-mode ruler-mode (define-minor-mode ruler-mode
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment