* rect.el (rectangle--default-line-number-format): Rename

from misspelled rectange--default-line-number-format (Bug#18045).
All uses changed.

2 files changed, 9 insertions, 3 deletions

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 28fa5d1a5e6..9039e43b009 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,9 @@
+2014-08-04  Paul Eggert  <eggert@cs.ucla.edu>
+
+        * rect.el (rectangle--default-line-number-format): Rename
+        from misspelled rectange--default-line-number-format (Bug#18045).
+        All uses changed.
+
 2014-08-03  Paul Eggert  <eggert@cs.ucla.edu>
 
         Don't mishandle year-9999 dates (Bug#18176).
diff --git a/lisp/rect.el b/lisp/rect.el
index e536e3e372c..0350ed6b22b 100644
--- a/lisp/rect.el
+++ b/lisp/rect.el
@@ -520,7 +520,7 @@ rectangle which were empty."
   (setq rectangle-number-line-counter
         (1+ rectangle-number-line-counter)))
 
-(defun rectange--default-line-number-format (start end start-at)
+(defun rectangle--default-line-number-format (start end start-at)
   (concat "%"
           (int-to-string (length (int-to-string (+ (count-lines start end)
                                                    start-at))))
@@ -541,11 +541,11 @@ with a prefix argument, prompt for START-AT and FORMAT."
               (start-at (read-number "Number to count from: " 1)))
          (list start end start-at
                (read-string "Format string: "
-                            (rectange--default-line-number-format
+                            (rectangle--default-line-number-format
                              start end start-at))))
      (list (region-beginning) (region-end) 1 nil)))
   (unless format
-    (setq format (rectange--default-line-number-format start end start-at)))
+    (setq format (rectangle--default-line-number-format start end start-at)))
   (let ((rectangle-number-line-counter start-at))
     (apply-on-rectangle 'rectangle-number-line-callback
                         start end format)))