From 62aed8a0ec3b20753b5740452fdaaa514adc7c82 Mon Sep 17 00:00:00 2001 From: grischka Date: Mon, 20 Apr 2009 16:40:19 +0200 Subject: [PATCH] cleanup prj-globalfile --- eproject.el | 14 +++++--------- 1 file changed, 5 insertions(+), 9 deletions(-) diff --git a/eproject.el b/eproject.el index 9c11ef2..d12e2a0 100644 --- a/eproject.el +++ b/eproject.el @@ -23,12 +23,10 @@ ;; There is a global file (defun prj-globalfile () (unless (boundp 'user-emacs-directory) - (setq user-emacs-directory "~/.emacs.d/") - ) - (let ((d (expand-file-name user-emacs-directory))) - (make-directory d t) - (concat d "eproject.lst") - )) + (setq user-emacs-directory "~/.emacs.d/") + ) + (concat (expand-file-name user-emacs-directory) "eproject.lst") + ) ;; with the list of all projects (defvar prj-list) @@ -278,9 +276,7 @@ )) (defun prj-savelist () - (let ((g (prj-globalfile)) - fp - ) + (let ((g (prj-globalfile)) fp) (unless (file-exists-p g) (make-directory (file-name-directory g) t) ) -- 2.11.4.GIT