>>>> "Gunnar" == Gunnar Evermann
<ge204(a)eng.cam.ac.uk> writes:
Gunnar> sperber(a)informatik.uni-tuebingen.de (Michael Sperber [Mr. Preprocessor])
writes:
>>
>>>> "Gunnar" ==
Gunnar Evermann <ge204(a)eng.cam.ac.uk> writes:
>>
Gunnar> let me know if you want me to test your package.
>
> That would be nice. I've now checked it in.
Gunnar> when pressing '=' to get diffs against the repository I get:
Gunnar> Signaling: (wrong-type-argument stringp nil)
Gunnar> re-search-forward(nil nil t)
Gunnar> diff-parse-hunks()
Gunnar> diff-mode()
Gunnar> eval((diff-mode))
Gunnar> cvs-sentinel(#<process "cvs" pid 10633 state:exit>
"exited abnormally with code 1\n")
Gunnar> diff-parse-hunks uses diff-hunk-pattern which is normally set to
Gunnar> something sensible by diff, but this doesn't happen here as we call
Gunnar> diff-mode directly.
That's why cvs-compat.el has this:
(defun cvs-prepare-diff-mode (flags)
"Gross hack to support XEmacs's diff-mode."
(if (boundp 'diff-hunk-pattern) ; recognize old diff.el from EFS/Dired
(catch 'done
(let ((flags (or flags (list nil))))
(while flags
(let ((patterns (assq (car flags) diff-search-pattern-alist)))
(if patterns
(progn
(setq diff-old-file-pattern (nth 2 patterns)
diff-new-file-pattern (nth 3 patterns)
diff-hunk-pattern (nth 1 patterns))
(throw 'done nil)))
(setq flags (cdr flags))))))))
Doesn't it get called for you?
--
Cheers =8-} Chipsy
Friede, Völkerverständigung und überhaupt blabla