Commit 16776caa authored by Richard M. Stallman's avatar Richard M. Stallman
Browse files

(diff): Really do use arg SWITCHES.

parent 4eda59a9
...@@ -196,9 +196,14 @@ With prefix arg, prompt for diff switches." ...@@ -196,9 +196,14 @@ With prefix arg, prompt for diff switches."
(let ((command (let ((command
(mapconcat 'identity (mapconcat 'identity
(append '("diff") (append '("diff")
(if (consp diff-switches) ;; Use explicitly specified switches
diff-switches (if switches
(list diff-switches)) (if (consp switches)
switches (list switches))
;; If not specified, use default.
(if (consp diff-switches)
diff-switches
(list diff-switches)))
(if (or old-alt new-alt) (if (or old-alt new-alt)
(list "-L" old "-L" new)) (list "-L" old "-L" new))
(list (or old-alt old)) (list (or old-alt old))
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment