Index: mercurial.el
===================================================================
RCS file: /home/svn/CVS/lispdev/emacs/mercurial.el,v
retrieving revision 1.3
diff -r1.3 mercurial.el
84a85,90
> (defcustom hg-diff-command "diff"
>   "The diff command to use when doing an hg-diff operation.
> Some users may wish to set this to \"extdiff\""
>   :type 'string
>   :group 'mercurial)
> 
1057c1063
<         (call-process (hg-binary) nil t nil "diff" path))
---
>         (call-process (hg-binary) nil t nil hg-diff-command path))
1059c1065
<         (call-process (hg-binary) nil t nil "diff" "-r" one path))
---
>         (call-process (hg-binary) nil t nil hg-diff-command "-r" one path))
1061c1067
<         (call-process (hg-binary) nil t nil "diff" "-r" rev1 "-r" rev2 path)))
---
>         (call-process (hg-binary) nil t nil hg-diff-command "-r" rev1 "-r" rev2 path)))