(toggle-truncate-lines): Make arg optional for

backward compatibility.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index ec6e6aab37eb69b7b00193c5269a1960d26964ce..7ebc95ccfd6551e1094abce59c360aa84489f053 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2006-05-26  Reiner Steib  <Reiner.Steib@gmx.de>
+
+       * simple.el (toggle-truncate-lines): Make arg optional for
+       backward compatibility.
+
 2006-05-26  Thien-Thi Nguyen  <ttn@gnu.org>
 
        * emacs-lisp/ewoc.el (ewoc--current-dll): New var.

diff --git a/lisp/simple.el b/lisp/simple.el
index 2209603d91ccd23ec994a64133af0ca716c3f1e4..5d52d867beb21258d1704914e5e9ea337316f709 100644 (file)
--- a/lisp/simple.el
+++ b/lisp/simple.el
@@ -4247,7 +4247,7 @@ The variable `selective-display' has a separate value for each buffer."
 (defvaralias 'indicate-unused-lines 'indicate-empty-lines)
 (defvaralias 'default-indicate-unused-lines 'default-indicate-empty-lines)
 
-(defun toggle-truncate-lines (arg)
+(defun toggle-truncate-lines (&optional arg)
   "Toggle whether to fold or truncate long lines on the screen.
 With arg, truncate long lines iff arg is positive.
 Note that in side-by-side windows, truncation is always enabled."