diff options
| author | Gerd Moellmann <gerd@gnu.org> | 2000-04-19 14:39:19 +0000 |
|---|---|---|
| committer | Gerd Moellmann <gerd@gnu.org> | 2000-04-19 14:39:19 +0000 |
| commit | 4f1390acaa01b10a107dfcdbb9b480ae75e3b7e3 (patch) | |
| tree | 2243a553a926d0c40078e57c05b94689617fe803 /lisp/emacs-lisp | |
| parent | b52425f4dd218330ca748660389bfe95ef522373 (diff) | |
| download | emacs-4f1390acaa01b10a107dfcdbb9b480ae75e3b7e3.tar.gz emacs-4f1390acaa01b10a107dfcdbb9b480ae75e3b7e3.tar.bz2 emacs-4f1390acaa01b10a107dfcdbb9b480ae75e3b7e3.zip | |
(gulp-maintainer): Use expand-file-name
instead of concat.
Diffstat (limited to 'lisp/emacs-lisp')
| -rw-r--r-- | lisp/emacs-lisp/gulp.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/emacs-lisp/gulp.el b/lisp/emacs-lisp/gulp.el index 9a41864d437..096460a1961 100644 --- a/lisp/emacs-lisp/gulp.el +++ b/lisp/emacs-lisp/gulp.el @@ -152,7 +152,7 @@ That is a list of elements, each of the form (MAINTAINER PACKAGES...)." (defun gulp-maintainer (filenm dir) "Return a list (MAINTAINER TIMESTAMP) for the package FILENM in directory DIR." (save-excursion - (let* ((fl (concat dir filenm)) mnt + (let* ((fl (expand-file-name filenm dir)) mnt (timest (format-time-string "%Y-%m-%d %a %T %Z" (elt (file-attributes fl) 5)))) (set-buffer gulp-tmp-buffer) |