From 636b0bf4cdbc0c03475cd3fe9467b71061912354 Mon Sep 17 00:00:00 2001
From: "Tom Breton (Tehom)" <tehom@panix.com>
Date: Sat, 11 Dec 2010 17:55:33 -0500
Subject: [PATCH] Changed formatting, docstring.

---
 elinstall.el | 7 +++----
 1 file changed, 3 insertions(+), 4 deletions(-)

diff --git a/elinstall.el b/elinstall.el
index cd698de..30e9a7b 100644
--- a/elinstall.el
+++ b/elinstall.el
@@ -863,7 +863,8 @@ DIR should be an absolute path."
    "Return a list of files in directory DIRNAME, minus certain files.
 The following files are omitted:
  * Dot files
- * Files that match an entry in `block-in-subtree'"
+ * Files that match an entry in `block-in-subtree'.
+Filenames are relative."
    (declare (special
 	       def-file block-in-dir block-in-subtree))
    (let*
@@ -1006,9 +1007,7 @@ Recurse just if RECURSE-DIRS-P"
 		  (mapcar
 		     #'(lambda (filename)
 			  (let
-			     ((fn (expand-file-name
-				     filename 
-				     dirname)))
+			     ((fn (expand-file-name filename dirname)))
 			  (if
 			     (file-directory-p fn)
 			     fn
-- 
2.11.4.GIT