[Emacs-diffs] Changes to emacs/lisp/calc/calc-alg.el

[Colin Walters]

Index: emacs/lisp/calc/calc-alg.el
diff -u emacs/lisp/calc/calc-alg.el:1.2 emacs/lisp/calc/calc-alg.el:1.3
--- emacs/lisp/calc/calc-alg.el:1.2     Wed Nov 14 04:00:01 2001
+++ emacs/lisp/calc/calc-alg.el Mon Nov 19 02:31:38 2001
@@ -1,6 +1,9 @@
-;; Calculator for GNU Emacs, part II [calc-alg.el]
+;;; calc-alg.el --- algebraic functions for Calc 
+
 ;; Copyright (C) 1990, 1991, 1992, 1993, 2001 Free Software Foundation, Inc.
-;; Written by Dave Gillespie, address@hidden
+
+;; Author: David Gillespie <address@hidden>
+;; Maintainer: Colin Walters <address@hidden>
 
 ;; This file is part of GNU Emacs.
 
@@ -19,7 +22,9 @@
 ;; file named COPYING.  Among other things, the copyright notice
 ;; and this notice must be preserved on all copies.
 
+;;; Commentary:
 
+;;; Code:
 
 ;; This file is autoloaded from calc-ext.el.
 (require 'calc-ext)
@@ -28,7 +33,6 @@
 
 (defun calc-Need-calc-alg () nil)
 
-
 ;;; Algebra commands.
 
 (defun calc-alg-evaluate (arg)
@@ -169,7 +173,7 @@
        (if (eq (car-safe old) 'error)
           (error "Bad format in expression: %s" (nth 1 old)))
        (or (math-expr-contains expr old)
-          (error "No occurrences found.")))
+          (error "No occurrences found")))
      (calc-enter-result num "sbst" (math-expr-subst expr old new)))))