diff options
| author | Thien-Thi Nguyen | 2006-07-05 07:35:46 +0000 |
|---|---|---|
| committer | Thien-Thi Nguyen | 2006-07-05 07:35:46 +0000 |
| commit | e12d3ded2a15857b1d75102f63df2083fb03bfa4 (patch) | |
| tree | ddaa568c6082deb3f6a69b9e6e052028d6cf11e5 | |
| parent | 98f46e1b427d3f549933e3e122c046f292179cfa (diff) | |
| download | emacs-e12d3ded2a15857b1d75102f63df2083fb03bfa4.tar.gz emacs-e12d3ded2a15857b1d75102f63df2083fb03bfa4.zip | |
(dun-load-d, dun-eval): Use eval-buffer.
| -rw-r--r-- | lisp/play/dunnet.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/play/dunnet.el b/lisp/play/dunnet.el index 2c6a75da03e..ae8a62c48f1 100644 --- a/lisp/play/dunnet.el +++ b/lisp/play/dunnet.el | |||
| @@ -1304,7 +1304,7 @@ for a moment, then straighten yourself up. | |||
| 1304 | (condition-case nil | 1304 | (condition-case nil |
| 1305 | (dun-rot13) | 1305 | (dun-rot13) |
| 1306 | (error (yank))) | 1306 | (error (yank))) |
| 1307 | (eval-current-buffer) | 1307 | (eval-buffer) |
| 1308 | (kill-buffer (current-buffer))) | 1308 | (kill-buffer (current-buffer))) |
| 1309 | (switch-to-buffer old-buffer) | 1309 | (switch-to-buffer old-buffer) |
| 1310 | result)) | 1310 | result)) |
| @@ -2576,7 +2576,7 @@ treasures for points?" "4" "four") | |||
| 2576 | (insert ")") | 2576 | (insert ")") |
| 2577 | (setq eval-error nil) | 2577 | (setq eval-error nil) |
| 2578 | (condition-case nil | 2578 | (condition-case nil |
| 2579 | (eval-current-buffer) | 2579 | (eval-buffer) |
| 2580 | (error (setq eval-error t))) | 2580 | (error (setq eval-error t))) |
| 2581 | (kill-buffer (current-buffer)) | 2581 | (kill-buffer (current-buffer)) |
| 2582 | (switch-to-buffer "*dungeon*") | 2582 | (switch-to-buffer "*dungeon*") |