/[emacs]/emacs/lisp/eshell/em-ls.el
ViewVC logotype

Diff of /emacs/lisp/eshell/em-ls.el

Parent Directory Parent Directory | Revision Log Revision Log | View Patch 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

Legend:
Removed from v.1.16  
changed lines
  Added in v.1.17

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26