From: Tassilo Horn Date: Tue, 20 Mar 2012 08:13:11 +0000 (+0100) Subject: * textmodes/artist.el (artist-menu-map): Bind Rectangle menu item X-Git-Tag: emacs-pretest-24.0.05~83^2~5 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=ee52ebf3e27fc33defe5971c2410dbe8746919e3;p=emacs.git * 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) --- 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 + + * 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 * 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))