[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] Changes to emacs/lisp/textmodes/artist.el
From: |
Thien-Thi Nguyen |
Subject: |
[Emacs-diffs] Changes to emacs/lisp/textmodes/artist.el |
Date: |
Thu, 06 Oct 2005 10:56:24 -0400 |
Index: emacs/lisp/textmodes/artist.el
diff -c emacs/lisp/textmodes/artist.el:1.25 emacs/lisp/textmodes/artist.el:1.26
*** emacs/lisp/textmodes/artist.el:1.25 Sat Sep 24 13:43:58 2005
--- emacs/lisp/textmodes/artist.el Thu Oct 6 14:56:23 2005
***************
*** 3379,3385 ****
;; that look like: \ / instead we get: ( )
;; \ / \ /
;; --------- ---------
! (let ((last-coord (last point-list)))
(if (= (artist-coord-get-new-char last-coord) ?/)
(artist-coord-set-new-char last-coord artist-ellipse-right-char)))
--- 3379,3385 ----
;; that look like: \ / instead we get: ( )
;; \ / \ /
;; --------- ---------
! (let ((last-coord (car (last point-list))))
(if (= (artist-coord-get-new-char last-coord) ?/)
(artist-coord-set-new-char last-coord artist-ellipse-right-char)))
***************
*** 3848,3855 ****
(x2 (artist-endpoint-get-x ep2))
(y2 (artist-endpoint-get-y ep2))
(dir1 (artist-find-direction x2 y2 x1 y1))
! (epn (last point-list))
! (epn-1 (last point-list 2))
(xn (artist-endpoint-get-x epn))
(yn (artist-endpoint-get-y epn))
(xn-1 (artist-endpoint-get-x epn-1))
--- 3848,3855 ----
(x2 (artist-endpoint-get-x ep2))
(y2 (artist-endpoint-get-y ep2))
(dir1 (artist-find-direction x2 y2 x1 y1))
! (epn (car (last point-list)))
! (epn-1 (car (last point-list 2)))
(xn (artist-endpoint-get-x epn))
(yn (artist-endpoint-get-y epn))
(xn-1 (artist-endpoint-get-x epn-1))
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emacs-diffs] Changes to emacs/lisp/textmodes/artist.el,
Thien-Thi Nguyen <=