Parent Directory | Revision Log | Patch
revision 1.18 by ttn, Fri Dec 17 11:47:16 2004 UTC | revision 1.19 by ttn, Fri Dec 17 11:58:21 2004 UTC | |
---|---|---|
# | Line 663 If nil, `zone-pgm-random-life' chooses a | Line 663 If nil, `zone-pgm-random-life' chooses a |
663 | c (aref s 0)) | c (aref s 0)) |
664 | (zone-replace-char | (zone-replace-char |
665 | (char-width c) | (char-width c) |
666 | t s (cond ((or (> top (point)) | 1 s (cond ((or (> top (point)) |
667 | (< bot (point)) | (< bot (point)) |
668 | (or (> 11 (setq col (current-column))) | (or (> 11 (setq col (current-column))) |
669 | (< rtc col))) | (< rtc col))) |
|
savannah-hackers-public@gnu.org | ViewVC Help |
Powered by ViewVC 1.1.26 |