From 24127af0a0e790319c72c4d447b166b04efa4e89 Mon Sep 17 00:00:00 2001
From: Gerd Moellmann <gerd@gnu.org>
Date: Sat, 18 Nov 2000 12:34:44 +0000
Subject: [PATCH] (mode-line-modified): Fix a typo. (mode-line-toggle-modified,
 mode-line-widen) (mode-line-abbrev-mode, mode-line-auto-fill-mode): Fix
 typos.

---
 lisp/ChangeLog   |  6 ++++++
 lisp/bindings.el | 10 +++++-----
 2 files changed, 11 insertions(+), 5 deletions(-)

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 9a5995880b7..32a67fe990c 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,9 @@
+2000-11-18  Gerd Moellmann  <gerd@gnu.org>
+
+	* bindings.el (mode-line-modified): Fix a typo.
+	(mode-line-toggle-modified, mode-line-widen) 
+	(mode-line-abbrev-mode, mode-line-auto-fill-mode): Fix typos.
+
 2000-11-17  Gerd Moellmann  <gerd@gnu.org>
 
 	* ps-print.el: Minor fixes from author.
diff --git a/lisp/bindings.el b/lisp/bindings.el
index 5de2bb88a24..2deea04faec 100644
--- a/lisp/bindings.el
+++ b/lisp/bindings.el
@@ -67,7 +67,7 @@ corresponding to the mode line clicked."
 
 (defun mode-line-toggle-modified (event)
   "Toggle the buffer-modified flag from the mode-line."
-  (interacive "e")
+  (interactive "e")
   (save-selected-window
     (select-window (posn-window (event-start event)))
     (set-buffer-modified-p (not (buffer-modified-p)))
@@ -76,7 +76,7 @@ corresponding to the mode line clicked."
 
 (defun mode-line-widen (event)
   "Widen a buffer from the mode-line."
-  (interacive "e")
+  (interactive "e")
   (save-selected-window
     (select-window (posn-window (event-start event)))
     (widen)
@@ -85,7 +85,7 @@ corresponding to the mode line clicked."
 
 (defun mode-line-abbrev-mode (event)
   "Turn off `abbrev-mode' from the mode-line."
-  (interacive "e")
+  (interactive "e")
   (save-selected-window
     (select-window (posn-window (event-start event)))
     (abbrev-mode)
@@ -94,7 +94,7 @@ corresponding to the mode line clicked."
 
 (defun mode-line-auto-fill-mode (event)
   "Turn off `auto-fill-mode' from the mode-line."
-  (interacive "e")
+  (interactive "e")
   (save-selected-window
     (select-window (posn-window (event-start event)))
     (auto-fill-mode)
@@ -183,7 +183,7 @@ Normally nil in most modes, since there is no process to display.")
 					      "R"
 					    "Not r")))))
 	 'local-map (purecopy (make-mode-line-mouse2-map
-			       #'mode-linetoggle-read-only)))
+			       #'mode-line-toggle-read-only)))
 	(propertize
 	 "%1+"
 	 'help-echo  (purecopy (lambda (window object point)
-- 
2.39.5