X-Git-Url: http://git.chise.org/gitweb/?p=chise%2Fxemacs-chise.git.1;a=blobdiff_plain;f=lisp%2Fpackage-admin.el;h=333d303a728bc32c3158a21224cca99cf05ee965;hp=5b732c550e6f9ce3acdad07fe96e2ff2a57f2e6e;hb=59eec5f21669e81977b5b1fe9bf717cab49cf7fb;hpb=032d062ebcb2344e6245cea4214bc09835da97ee

diff --git a/lisp/package-admin.el b/lisp/package-admin.el
index 5b732c5..333d303 100644
--- a/lisp/package-admin.el
+++ b/lisp/package-admin.el
@@ -441,7 +441,8 @@ PACKAGE is a symbol, not a string."
 	    ;; Delete empty directories.
 	    (if dirs
 		(let ( (orig-default-directory default-directory)
-		       directory files file )
+		       ;; directory files file
+		       )
 		  ;; Make sure we preserve the existing `default-directory'.
 		  ;; JV, why does this change the default directory? Does it indeed?
 		  (unwind-protect