summaryrefslogtreecommitdiffstats
path: root/emacs/caml.el
diff options
context:
space:
mode:
Diffstat (limited to 'emacs/caml.el')
-rw-r--r--emacs/caml.el2
1 files changed, 2 insertions, 0 deletions
diff --git a/emacs/caml.el b/emacs/caml.el
index 628ca979d..a3edb8974 100644
--- a/emacs/caml.el
+++ b/emacs/caml.el
@@ -597,6 +597,7 @@ from an error message produced by camlc.")
;; Wrapper around next-error.
(defvar caml-error-overlay nil)
+(defvar caml-emacs-twenty (string-match "20\." (emacs-version)))
;;itz 04-21-96 somebody didn't get the documetation for next-error
;;right. When the optional argument is a number n, it should move
@@ -629,6 +630,7 @@ possible."
(string-to-int
(buffer-substring (match-beginning 2) (match-end 2)))))))
(cond (beg
+ (if caml-emacs-twenty (beginning-of-line))
(setq beg (+ (point) beg)
end (+ (point) end))
(goto-char beg)