diff options
| author | Chong Yidong | 2010-09-23 15:00:31 -0400 |
|---|---|---|
| committer | Chong Yidong | 2010-09-23 15:00:31 -0400 |
| commit | 266a86bd7fedf743225c2497956b73ecb2245196 (patch) | |
| tree | 7d0c8b128070eac293ce2606acb4e55de5843ba8 /lisp/textmodes | |
| parent | 29cdc13ed61e5a64ba30df1030029898a26b7947 (diff) | |
| parent | af3ccb5cc061bccab1c9b024ea444d01c0767767 (diff) | |
| download | emacs-266a86bd7fedf743225c2497956b73ecb2245196.tar.gz emacs-266a86bd7fedf743225c2497956b73ecb2245196.zip | |
Merge changes from emacs-23 branch
Diffstat (limited to 'lisp/textmodes')
| -rw-r--r-- | lisp/textmodes/artist.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/textmodes/artist.el b/lisp/textmodes/artist.el index 41145afb766..bca7eed00d2 100644 --- a/lisp/textmodes/artist.el +++ b/lisp/textmodes/artist.el | |||
| @@ -2939,7 +2939,7 @@ Blanks in the rendered text overwrite any text in the buffer." | |||
| 2939 | Returns a list of points. Each point is on the form (X1 . Y1)." | 2939 | Returns a list of points. Each point is on the form (X1 . Y1)." |
| 2940 | (let ((points)) | 2940 | (let ((points)) |
| 2941 | (while (> n 0) | 2941 | (while (> n 0) |
| 2942 | (let* ((angle (* (random 359) (/ pi 180))) | 2942 | (let* ((angle (* (random 359) (/ float-pi 180))) |
| 2943 | (dist (random radius)) | 2943 | (dist (random radius)) |
| 2944 | (point (cons (round (* dist (cos angle))) | 2944 | (point (cons (round (* dist (cos angle))) |
| 2945 | (round (* dist (sin angle)))))) | 2945 | (round (* dist (sin angle)))))) |