(insert-directory): Modify the "total" line wording, in accordance with

files.el's insert-directory.

lisp/ChangeLog

+2001-12-30  Eli Zaretskii  <eliz@is.elta.co.il>
+
+	* ls-lisp.el (insert-directory): Modify the "total" line wording,
+	in accordance with files.el's insert-directory.
+
 2001-12-29  Richard M. Stallman  <rms@gnu.org>
 
 	* files.el (basic-save-buffer): If a before-write hook displays

lisp/ls-lisp.el

@@ -208,8 +208,8 @@ that work are: A a c i r S s t u U X g G B C R and F partly."
 	  (when (re-search-forward "^total" nil t)
 	    (let ((available (get-free-disk-space ".")))
 	      (when available
-		;; Replace "total" with "used", to avoid confusion.
-		(replace-match "used")
+		;; Replace "total" with "total used", to avoid confusion.
+		(replace-match "total used in directory")
 		(end-of-line)
 		(insert " available " available)))))))))