Parent Directory | Revision Log | Patch
revision 2.55 by ttn, Sat Aug 6 22:13:42 2005 UTC | revision 2.56 by rfrancoise, Sat Sep 24 23:26:27 2005 UTC | |
---|---|---|
# | Line 519 Commands: Equival | Line 519 Commands: Equival |
519 | (if (or (eq enable-local-eval t) | (if (or (eq enable-local-eval t) |
520 | (yes-or-no-p | (yes-or-no-p |
521 | (concat "Evaluate lisp code in buffer " | (concat "Evaluate lisp code in buffer " |
522 | (buffer-name) " to display forms "))) | (buffer-name) " to display forms? "))) |
523 | (eval-buffer) | (eval-buffer) |
524 | (error "`enable-local-eval' inhibits buffer evaluation")) | (error "`enable-local-eval' inhibits buffer evaluation")) |
525 |
|
savannah-hackers-public@gnu.org | ViewVC Help |
Powered by ViewVC 1.1.26 |