* textmodes/artist.el (artist-menu-map): Bind Rectangle menu item

  to draw rectangles, not squares.  (Regression introduced by
  2011-03-02T03:48:01Z!cyd@stupidchicken.com)

2 files changed, 8 insertions, 1 deletions

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index a6f5a5fd525..731a443390c 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,9 @@
+2012-03-20  Tassilo Horn  <tassilo@member.fsf.org>
+
+        * textmodes/artist.el (artist-menu-map): Bind Rectangle menu item
+        to draw rectangles, not squares.  (Regression introduced by revno
+        2011-03-02T03:48:01Z!cyd@stupidchicken.com)
+
 2012-03-18  Chong Yidong  <cyd@gnu.org>
 
         * faces.el (face-spec-reset-face): Don't call display-graphic-p if
diff --git a/lisp/textmodes/artist.el b/lisp/textmodes/artist.el
index fdfb1a51ba0..72ae44bb60d 100644
--- a/lisp/textmodes/artist.el
+++ b/lisp/textmodes/artist.el
@@ -535,7 +535,8 @@ This variable is initialized by the `artist-make-prev-next-op-alist' function.")
                   ("Text" artist-select-op-text-overwrite text-ovwrt)
                   ("Ellipse" artist-select-op-circle circle)
                   ("Poly-line" artist-select-op-straight-poly-line spolyline)
-                  ("Rectangle" artist-select-op-square square)
+                  ("Square" artist-select-op-square square)
+                  ("Rectangle" artist-select-op-rectangle rectangle)
                   ("Line" artist-select-op-straight-line s-line)
                   ("Pen" artist-select-op-pen-line pen-line)))
       (define-key map (vector (nth 2 op))