# HG changeset patch
# User Erik Naggum <erik@naggum.no>
# Date 836701652 0
# Node ID fc1c1eb8cdd7ae9cc20c39d4b3588a8a8d6f63a5
# Parent  b43e16d8ab5b9dc9f616a60805e3e21eeeb7c6e3
(insert-directory): Fix previous change.

diff -r b43e16d8ab5b -r fc1c1eb8cdd7 lisp/files.el
--- a/lisp/files.el	Sat Jul 06 20:02:39 1996 +0000
+++ b/lisp/files.el	Sun Jul 07 01:07:32 1996 +0000
@@ -2661,7 +2661,7 @@
 			     (setq list (cons (substring switches 0 (match-beginning 0))
 					      list)
 				   switches (substring switches (match-end 0))))
-			   (setq list (cons (nreverse switches) list)))))
+			   (setq list (nreverse (cons switches list))))))
 		   (append list
 			   (list
 			    (if full-directory-p