From 0943fe237295d67431e4e64881332a52181349e0 Mon Sep 17 00:00:00 2001
From: Karl Heuer <kwzh@gnu.org>
Date: Fri, 22 Apr 1994 23:59:24 +0000
Subject: Pass operation to find-file-name-handler.

---
 lisp/ls-lisp.el | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'lisp/ls-lisp.el')

diff --git a/lisp/ls-lisp.el b/lisp/ls-lisp.el
index 38a68cdc10a..0a5a5942347 100644
--- a/lisp/ls-lisp.el
+++ b/lisp/ls-lisp.el
@@ -62,7 +62,7 @@ It does not support ordinary shell wildcards; instead, it allows
 regular expressions to match file names.
 
 The switches that work are: A a c i r S s t u"
-  (let ((handler (find-file-name-handler file)))
+  (let ((handler (find-file-name-handler file 'insert-directory)))
     (if handler
 	(funcall handler 'insert-directory file switches
 		 wildcard full-directory-p)
-- 
cgit v1.2.1