* face-remap.el (text-scale-increase, text-scale-decrease)

  (text-scale-adjust): Remove &optional keyword from the arg list;
  the INC argument is not really optional, if the functions happen
  to be called from elisp.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index a1a04113dd829ca81e0f502a9845c1bab9593a81..509583328cd3ca93c8a595f716be593bc584d862 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,10 @@
+2008-10-27  Juanma Barranquero  <lekktu@gmail.com>
+
+       * face-remap.el (text-scale-increase, text-scale-decrease)
+       (text-scale-adjust): Remove &optional keyword from the arg list;
+       the INC argument is not really optional, if the functions happen
+       to be called from elisp.
+
 2008-10-27  Dan Nicolaescu  <dann@ics.uci.edu>
 
        * vc.el: Rename VC methods that were missed when vc-status was
@@ -11,7 +18,7 @@
        * vc-dir.el (vc-dir-mode): Use vc-dir-printer instead of
        vc-dir-status-printer.
        (vc-dir-headers): Use `dir-extra-headers' instead of
-       `status-extra-headers'
+       `status-extra-headers'.
        (vc-dir-printer): Rename from vc-dir-status-printer.
        (vc-default-dir-extra-headers): Rename from
        vc-default-status-extra-headers.

diff --git a/lisp/face-remap.el b/lisp/face-remap.el
index 32bba13d00d60ef618fca4d9316d7b79486ffe7b..f87a86c70a0b113fe9de59e8ae842443dc081bc1 100644 (file)
--- a/lisp/face-remap.el
+++ b/lisp/face-remap.el
@@ -229,7 +229,7 @@ be used to interactively modify the variable
   (force-window-update (current-buffer)))
 
 ;;;###autoload
-(defun text-scale-increase (&optional inc)
+(defun text-scale-increase (inc)
   "Increase the height of the default face in the current buffer by INC steps.
 If the new height is other than the default, `text-scale-mode' is enabled.
 
@@ -243,7 +243,7 @@ will remove any scaling currently active."
   (text-scale-mode (if (zerop text-scale-mode-amount) -1 1)))
 
 ;;;###autoload
-(defun text-scale-decrease (&optional dec)
+(defun text-scale-decrease (dec)
   "Decrease the height of the default face in the current buffer by DEC steps.
 See `text-scale-increase' for more details."
   (interactive "p")
@@ -254,7 +254,7 @@ See `text-scale-increase' for more details."
 ;;;###autoload (define-key ctl-x-map [(control ?=)] 'text-scale-adjust)
 ;;;###autoload (define-key ctl-x-map [(control ?0)] 'text-scale-adjust)
 ;;;###autoload
-(defun text-scale-adjust (&optional inc)
+(defun text-scale-adjust (inc)
   "Increase or decrease the height of the default face in the current buffer.
 
 The actual adjustment made depends on the final component of the