changeset 53080:76ece241e712

(eshell-ls-file): There are times with size-width is nil and uncomputed (when directories are created in dired, for example); in this case, 4 is reasonable default value, although it may caused skewed new entries (which could be avoided by returning the original value of 8 in all cases, but 99% of the time this is a waste of whitespace).
author John Wiegley <johnw@newartisans.com>
date Mon, 17 Nov 2003 00:24:06 +0000
parents 266ab3a82845
children 54b6dde2522b
files lisp/eshell/em-ls.el
diffstat 1 files changed, 2 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/eshell/em-ls.el	Mon Nov 17 00:22:59 2003 +0000
+++ b/lisp/eshell/em-ls.el	Mon Nov 17 00:24:06 2003 +0000
@@ -480,8 +480,8 @@
 		     ""))
 		(let* ((str (eshell-ls-printable-size (nth 7 attrs)))
 		       (len (length str)))
-		  (if (< len size-width)
-		      (concat (make-string (- size-width len) ? ) str)
+		  (if (< len (or size-width 4))
+		      (concat (make-string (- (or size-width 4) len) ? ) str)
 		    str))
 		" " (format-time-string
 		     (concat