Parent Directory | Revision Log | Patch
revision 1.12.4.2 by miles, Tue Oct 14 23:51:31 2003 UTC | revision 1.12.4.3 by miles, Fri Nov 21 00:36:07 2003 UTC | |
---|---|---|
# | Line 480 whose cdr is the list of file attributes | Line 480 whose cdr is the list of file attributes |
480 | "")) | "")) |
481 | (let* ((str (eshell-ls-printable-size (nth 7 attrs))) | (let* ((str (eshell-ls-printable-size (nth 7 attrs))) |
482 | (len (length str))) | (len (length str))) |
483 | (if (< len 8) | (if (< len (or size-width 4)) |
484 | (concat (make-string (- 8 len) ? ) str) | (concat (make-string (- (or size-width 4) len) ? ) str) |
485 | str)) | str)) |
486 | " " (format-time-string | " " (format-time-string |
487 | (concat | (concat |
|
savannah-hackers-public@gnu.org | ViewVC Help |
Powered by ViewVC 1.1.26 |