diff options
| author | Jay Belanger | 2004-11-26 22:34:23 +0000 |
|---|---|---|
| committer | Jay Belanger | 2004-11-26 22:34:23 +0000 |
| commit | 3f53a1f4df0e5691b4f3d9ac6ceeeb1e06a395cf (patch) | |
| tree | eb9c9a485ab279f2f62e811f520387ce75200a56 | |
| parent | 866ebaa9050adcc75b2c6f057b35266dafce41b4 (diff) | |
| download | emacs-3f53a1f4df0e5691b4f3d9ac6ceeeb1e06a395cf.tar.gz emacs-3f53a1f4df0e5691b4f3d9ac6ceeeb1e06a395cf.zip | |
(calc-original-buffer, calc-return-buffer, calc-one-window)
(calc-edit-handler, calc-restore-trail, calc-allow-ret): Declare them.
| -rw-r--r-- | lisp/calc/calc-yank.el | 10 |
1 files changed, 8 insertions, 2 deletions
diff --git a/lisp/calc/calc-yank.el b/lisp/calc/calc-yank.el index eff391e81b8..d43873c28b7 100644 --- a/lisp/calc/calc-yank.el +++ b/lisp/calc/calc-yank.el | |||
| @@ -3,8 +3,7 @@ | |||
| 3 | ;; Copyright (C) 1990, 1991, 1992, 1993, 2001 Free Software Foundation, Inc. | 3 | ;; Copyright (C) 1990, 1991, 1992, 1993, 2001 Free Software Foundation, Inc. |
| 4 | 4 | ||
| 5 | ;; Author: David Gillespie <daveg@synaptics.com> | 5 | ;; Author: David Gillespie <daveg@synaptics.com> |
| 6 | ;; Maintainers: D. Goel <deego@gnufans.org> | 6 | ;; Maintainer: Jay Belanger <belanger@truman.edu> |
| 7 | ;; Colin Walters <walters@debian.org> | ||
| 8 | 7 | ||
| 9 | ;; This file is part of GNU Emacs. | 8 | ;; This file is part of GNU Emacs. |
| 10 | 9 | ||
| @@ -428,6 +427,13 @@ | |||
| 428 | (define-key calc-edit-mode-map "\r" 'calc-edit-return) | 427 | (define-key calc-edit-mode-map "\r" 'calc-edit-return) |
| 429 | (define-key calc-edit-mode-map "\C-c\C-c" 'calc-edit-finish)) | 428 | (define-key calc-edit-mode-map "\C-c\C-c" 'calc-edit-finish)) |
| 430 | 429 | ||
| 430 | (defvar calc-original-buffer) | ||
| 431 | (defvar calc-return-buffer) | ||
| 432 | (defvar calc-one-window) | ||
| 433 | (defvar calc-edit-handler) | ||
| 434 | (defvar calc-restore-trail) | ||
| 435 | (defvar calc-allow-ret) | ||
| 436 | |||
| 431 | (defun calc-edit-mode (&optional handler allow-ret title) | 437 | (defun calc-edit-mode (&optional handler allow-ret title) |
| 432 | "Calculator editing mode. Press RET, LFD, or C-c C-c to finish. | 438 | "Calculator editing mode. Press RET, LFD, or C-c C-c to finish. |
| 433 | To cancel the edit, simply kill the *Calc Edit* buffer." | 439 | To cancel the edit, simply kill the *Calc Edit* buffer." |