aboutsummaryrefslogtreecommitdiffstats
path: root/src
diff options
context:
space:
mode:
authorEli Zaretskii2019-11-04 17:39:12 +0200
committerEli Zaretskii2019-11-04 17:39:12 +0200
commita256e03bd944384efb3da05858264a5d3b72462d (patch)
treec98f7f00ba047196e705975bdb46071ccfb9d93d /src
parent1d4862e8c18aff5e2a59b9fb37e643a389683047 (diff)
downloademacs-a256e03bd944384efb3da05858264a5d3b72462d.tar.gz
emacs-a256e03bd944384efb3da05858264a5d3b72462d.zip
Fix last change in dired.c
* src/dired.c (file_name_completion): Fix arguments to Fcompare_strings. (Bug#38056)
Diffstat (limited to 'src')
-rw-r--r--src/dired.c4
1 files changed, 2 insertions, 2 deletions
diff --git a/src/dired.c b/src/dired.c
index 0e1c88f03ce..a5153790c45 100644
--- a/src/dired.c
+++ b/src/dired.c
@@ -585,7 +585,7 @@ file_name_completion (Lisp_Object file, Lisp_Object dirname, bool all_flag,
585 cmp_len = make_fixnum (elt_len); 585 cmp_len = make_fixnum (elt_len);
586 if (skip < 0 586 if (skip < 0
587 || !EQ (Fcompare_strings (name, make_fixnum (skip), 587 || !EQ (Fcompare_strings (name, make_fixnum (skip),
588 cmp_len, 588 Qnil,
589 elt, zero, cmp_len, Qt), 589 elt, zero, cmp_len, Qt),
590 Qt)) 590 Qt))
591 continue; 591 continue;
@@ -619,7 +619,7 @@ file_name_completion (Lisp_Object file, Lisp_Object dirname, bool all_flag,
619 cmp_len = make_fixnum (elt_len); 619 cmp_len = make_fixnum (elt_len);
620 if (skip < 0 620 if (skip < 0
621 || !EQ (Fcompare_strings (name, make_fixnum (skip), 621 || !EQ (Fcompare_strings (name, make_fixnum (skip),
622 cmp_len, 622 Qnil,
623 elt, zero, cmp_len, Qt), 623 elt, zero, cmp_len, Qt),
624 Qt)) 624 Qt))
625 continue; 625 continue;