diff options
| author | Eli Zaretskii <eliz@gnu.org> | 1998-11-08 17:24:16 +0000 |
|---|---|---|
| committer | Eli Zaretskii <eliz@gnu.org> | 1998-11-08 17:24:16 +0000 |
| commit | 5f1af2d872b58f5f990a7a667aab32cd5152388b (patch) | |
| tree | aab2739e8454409c137fca1f54c69cb99422d018 /lisp/loadhist.el | |
| parent | 9741697386890174d00a6fbef209d6208ef83351 (diff) | |
| download | emacs-5f1af2d872b58f5f990a7a667aab32cd5152388b.tar.gz | |
(symbol-file): Run fns-VERSION.el through
convert-standard-filename.
Diffstat (limited to 'lisp/loadhist.el')
| -rw-r--r-- | lisp/loadhist.el | 8 |
1 files changed, 6 insertions, 2 deletions
diff --git a/lisp/loadhist.el b/lisp/loadhist.el index 419fe6c135a..8df66d3bcc9 100644 --- a/lisp/loadhist.el +++ b/lisp/loadhist.el @@ -40,8 +40,12 @@ which is cleared out before dumping to make Emacs smaller.") "Return the input source from which SYM was loaded. This is a file name, or nil if the source was a buffer with no associated file." (unless load-history-loaded - (load (expand-file-name (format "fns-%s.el" emacs-version) - exec-directory)) + (load (expand-file-name + ;; fns-XX.YY.ZZ.el does not work on DOS filesystem. + (convert-standard-filename (format "fns-%s.el" emacs-version)) + exec-directory) + ;; The file name fns-%s.el already has a .el extension. + nil nil t) (setq load-history-loaded t)) (catch 'foundit (mapcar |