(ls-lisp-insert-directory): Use `string-width' instead of `length'

for comparing length of user and group names.

lisp/ChangeLog

+2008-05-03  Eli Zaretskii  <eliz@gnu.org>
+
+	* ls-lisp.el (ls-lisp-insert-directory): Use `string-width'
+	instead of `length' for comparing length of user and group names.
+
 2008-05-03  Eric S. Raymond  <esr@snark.thyrsus.com>
 	* vc-dispatcher.el: New file, separates out the UI and command 

lisp/ls-lisp.el

@@ -329,9 +329,11 @@ not contain `d', so that a full listing is expected."
 	  (dolist (elt file-alist)
 	    (setq attr (cdr elt)
 		  fuid (nth 2 attr)
-		  uid-len (length (if (stringp fuid) fuid (format "%d" fuid)))
+		  uid-len (if (stringp fuid) (string-width fuid)
+			    (length (format "%d" fuid)))
 		  fgid (nth 3 attr)
-		  gid-len (length (if (stringp fgid) fgid (format "%d" fgid)))
+		  gid-len (if (stringp fgid) (string-width fgid)
+			    (length (format "%d" fgid)))
 		  file-size (nth 7 attr))
 	    (if (> uid-len max-uid-len)
 		(setq max-uid-len uid-len))