From 4f1390acaa01b10a107dfcdbb9b480ae75e3b7e3 Mon Sep 17 00:00:00 2001 From: Gerd Moellmann Date: Wed, 19 Apr 2000 14:39:19 +0000 Subject: [PATCH] (gulp-maintainer): Use expand-file-name instead of concat. --- lisp/emacs-lisp/gulp.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) 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) -- 2.39.5