diff options
| author | Jay Belanger | 2004-11-30 17:22:12 +0000 |
|---|---|---|
| committer | Jay Belanger | 2004-11-30 17:22:12 +0000 |
| commit | 51b5c91c515e5e4adc35ba93586a7cc5e4bae712 (patch) | |
| tree | 6b51e0b8aa56d83e784806049195b828c6ecee33 /lisp | |
| parent | a2470ec963d7afe9b6c87ab64395c197d8a70478 (diff) | |
| download | emacs-51b5c91c515e5e4adc35ba93586a7cc5e4bae712.tar.gz emacs-51b5c91c515e5e4adc35ba93586a7cc5e4bae712.zip | |
Add a provide statement.
(calc-Need-calc-rules): Remove it.
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/calc/calc-rules.el | 10 |
1 files changed, 4 insertions, 6 deletions
diff --git a/lisp/calc/calc-rules.el b/lisp/calc/calc-rules.el index f11df8e1f56..1ccbf3fffac 100644 --- a/lisp/calc/calc-rules.el +++ b/lisp/calc/calc-rules.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 | ||
| @@ -28,13 +27,10 @@ | |||
| 28 | ;;; Code: | 27 | ;;; Code: |
| 29 | 28 | ||
| 30 | ;; This file is autoloaded from calc-ext.el. | 29 | ;; This file is autoloaded from calc-ext.el. |
| 31 | (require 'calc-ext) | ||
| 32 | 30 | ||
| 31 | (require 'calc-ext) | ||
| 33 | (require 'calc-macs) | 32 | (require 'calc-macs) |
| 34 | 33 | ||
| 35 | (defun calc-Need-calc-rules () nil) | ||
| 36 | |||
| 37 | |||
| 38 | (defun calc-compile-rule-set (name rules) | 34 | (defun calc-compile-rule-set (name rules) |
| 39 | (prog2 | 35 | (prog2 |
| 40 | (message "Preparing rule set %s..." name) | 36 | (message "Preparing rule set %s..." name) |
| @@ -438,5 +434,7 @@ fitsystem(y, xv, pv, 0) := fitsystem(y, xv, cons(fvh,fvt)) | |||
| 438 | hasfitparams(pv)))), | 434 | hasfitparams(pv)))), |
| 439 | fitparam(n) = x := x ]")) | 435 | fitparam(n) = x := x ]")) |
| 440 | 436 | ||
| 437 | (provide 'calc-rules) | ||
| 438 | |||
| 441 | ;;; arch-tag: 0ed54a52-38f3-4ed7-9ca7-b8ecf8f2febe | 439 | ;;; arch-tag: 0ed54a52-38f3-4ed7-9ca7-b8ecf8f2febe |
| 442 | ;;; calc-rules.el ends here | 440 | ;;; calc-rules.el ends here |