# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 774072189 0
# Node ID d87067f822f5ade07fc68b27a638fe2a0620de17
# Parent  5226ed89c1a65ffa25ee2404649e442417b5c957
(insert-directory): Fix previous change.

diff -r 5226ed89c1a6 -r d87067f822f5 lisp/files.el
--- a/lisp/files.el	Wed Jul 13 03:52:05 1994 +0000
+++ b/lisp/files.el	Wed Jul 13 04:03:09 1994 +0000
@@ -2126,9 +2126,9 @@
 					 " -d "
 					 (if (stringp switches)
 					     switches
-					   (mapconcat 'identity switches " ")
+					   (mapconcat 'identity switches " "))
 					 " "
-					 pattern))))
+					 pattern)))
 	  ;; SunOS 4.1.3, SVr4 and others need the "." to list the
 	  ;; directory if FILE is a symbolic link.
 	  (apply 'call-process