diff options
| author | Jay Belanger | 2004-11-30 17:09:05 +0000 |
|---|---|---|
| committer | Jay Belanger | 2004-11-30 17:09:05 +0000 |
| commit | 3ccef44f1902ffce9c1c3ed6488664d076e49a4a (patch) | |
| tree | 0edc1195078deb5a00b8728c1b8f7e7939236044 | |
| parent | 76216e5acd53a56d34586bf782efffac9afbe594 (diff) | |
| download | emacs-3ccef44f1902ffce9c1c3ed6488664d076e49a4a.tar.gz emacs-3ccef44f1902ffce9c1c3ed6488664d076e49a4a.zip | |
Add a provide statement.
(calc-Need-calc-frac): Remove it.
| -rw-r--r-- | lisp/calc/calc-frac.el | 9 |
1 files changed, 4 insertions, 5 deletions
diff --git a/lisp/calc/calc-frac.el b/lisp/calc/calc-frac.el index 48201a7dc8a..cdb8ac9beb6 100644 --- a/lisp/calc/calc-frac.el +++ b/lisp/calc/calc-frac.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,12 +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-frac () nil) | ||
| 36 | |||
| 37 | (defun calc-fdiv (arg) | 34 | (defun calc-fdiv (arg) |
| 38 | (interactive "P") | 35 | (interactive "P") |
| 39 | (calc-slow-wrapper | 36 | (calc-slow-wrapper |
| @@ -220,5 +217,7 @@ | |||
| 220 | (math-reject-arg b 'integerp)) | 217 | (math-reject-arg b 'integerp)) |
| 221 | (math-reject-arg a 'integerp))) | 218 | (math-reject-arg a 'integerp))) |
| 222 | 219 | ||
| 220 | (provide 'calc-frac) | ||
| 221 | |||
| 223 | ;;; arch-tag: 89d65274-0b3b-42d8-aacd-eaf86da5b4ea | 222 | ;;; arch-tag: 89d65274-0b3b-42d8-aacd-eaf86da5b4ea |
| 224 | ;;; calc-frac.el ends here | 223 | ;;; calc-frac.el ends here |