Parent Directory | Revision Log | Patch
revision 1.16 by miles, Mon Sep 1 15:45:23 2003 UTC | revision 1.17 by johnw, Sun Nov 16 09:23:49 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 size-width) |
484 | (concat (make-string (- 8 len) ? ) str) | (concat (make-string (- size-width 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 |