From: Jay Belanger <jay.p.belanger@gmail.com>
Date: Sat, 8 Jan 2005 20:35:45 +0000 (+0000)
Subject: (calc-mode): Remove the extension from `calc-settings-file' for loading.
X-Git-Tag: ttn-vms-21-2-B4~2861
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=6bbfeec558c35adffa9945f26f0c112ed6e822e6;p=emacs.git

(calc-mode): Remove the extension from `calc-settings-file' for loading.
---

diff --git a/lisp/calc/calc.el b/lisp/calc/calc.el
index a0bd5aaff11..635cb75520f 100644
--- a/lisp/calc/calc.el
+++ b/lisp/calc/calc.el
@@ -1028,7 +1028,7 @@ Notations:  3.14e6     3.14 * 10^6
       (equal calc-settings-file user-init-file)
       (progn
 	(setq calc-loaded-settings-file t)
-	(load calc-settings-file t)))   ; t = missing-ok
+	(load (file-name-sans-extension calc-settings-file) t)))   ; t = missing-ok
   (let ((p command-line-args))
     (while p
       (and (equal (car p) "-f")