procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

(zone): Let-bind show-trailing-whitespace to nil.

Browse source
This commit is contained in:
Thien-Thi Nguyen 2007-10-01 06:36:58 +00:00
parent 86e405cfcb
commit 5db1723918
2 changed files with 7 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
lisp/ChangeLog
View file

@ -1,3 +1,8 @@
2007-10-01 Thien-Thi Nguyen <ttn@gnuvola.org>
* play/zone.el (zone): Let-bind show-trailing-whitespace to nil.
Suggested by Chris Moore <christopher.ian.moore@gmail.com>.
2007-10-01 Jay Belanger <jay.p.belanger@gmail.com>
* calc/calc-math.el (math-largest-emacs-expt): Handle the cases

2
lisp/play/zone.el
View file

@ -138,6 +138,7 @@ If the element is a function or a list of a function and a number,
(sit-for 0 500)
(let ((pgm (elt zone-programs (random (length zone-programs))))
(ct (and f (frame-parameter f 'cursor-type)))
(show-trailing-whitespace nil)
(restore (list '(kill-buffer outbuf))))
(when ct
(modify-frame-parameters f '((cursor-type . (bar . 0))))
@ -684,6 +685,7 @@ If nil, `zone-pgm-random-life' chooses a value from 0-3 (inclusive).")
(life (or zone-pgm-random-life-wait (random 4)))
(kill-buffer nil))))
(random t)
;;;;;;;;;;;;;;;