emacs-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[Emacs-diffs] Changes to emacs/lisp/progmodes/compile.el


From: Daniel Pfeiffer
Subject: [Emacs-diffs] Changes to emacs/lisp/progmodes/compile.el
Date: Fri, 18 Jun 2004 19:10:06 -0400

Index: emacs/lisp/progmodes/compile.el
diff -c emacs/lisp/progmodes/compile.el:1.321 
emacs/lisp/progmodes/compile.el:1.322
*** emacs/lisp/progmodes/compile.el:1.321       Tue Jun  8 21:36:37 2004
--- emacs/lisp/progmodes/compile.el     Fri Jun 18 23:00:46 2004
***************
*** 583,589 ****
         (setq col (match-string-no-properties col))
         (setq col (- (string-to-number col) compilation-first-column)))
      (if (and end-col (setq end-col (match-string-no-properties end-col)))
!       (setq end-col (- (string-to-number end-col) compilation-first-column))
        (if end-line (setq end-col -1)))
      (if (consp type)                  ; not a static type, check what it is.
        (setq type (or (and (car type) (match-end (car type)) 1)
--- 583,589 ----
         (setq col (match-string-no-properties col))
         (setq col (- (string-to-number col) compilation-first-column)))
      (if (and end-col (setq end-col (match-string-no-properties end-col)))
!       (setq end-col (- (string-to-number end-col) compilation-first-column 
-1))
        (if end-line (setq end-col -1)))
      (if (consp type)                  ; not a static type, check what it is.
        (setq type (or (and (car type) (match-end (car type)) 1)




reply via email to

[Prev in Thread] Current Thread [Next in Thread]