comparison lisp/progmodes/compile.el @ 6673:137122de77ef

(compile-reinitialize-errors): Fix typo in comment.
author Karl Heuer <kwzh@gnu.org>
date Tue, 05 Apr 1994 02:19:02 +0000
parents b7196b4a3679
children 3723e842825c
comparison
equal deleted inserted replaced
6672:12aafd560832 6673:137122de77ef
657 ;; This was here for a long time (before my rewrite); why? --roland 657 ;; This was here for a long time (before my rewrite); why? --roland
658 ;;(switch-to-buffer compilation-last-buffer) 658 ;;(switch-to-buffer compilation-last-buffer)
659 (set-buffer-modified-p nil) 659 (set-buffer-modified-p nil)
660 (if (< compilation-parsing-end (point-max)) 660 (if (< compilation-parsing-end (point-max))
661 ;; compilation-error-list might be non-nil if we have a non-nil 661 ;; compilation-error-list might be non-nil if we have a non-nil
662 ;; LIMIT-SEARCH of FIND-AT-LEAST arg. In that case its value 662 ;; LIMIT-SEARCH or FIND-AT-LEAST arg. In that case its value
663 ;; records the current position in the error list, and we must 663 ;; records the current position in the error list, and we must
664 ;; preserve that after reparsing. 664 ;; preserve that after reparsing.
665 (let ((error-list-pos compilation-error-list)) 665 (let ((error-list-pos compilation-error-list))
666 (funcall compilation-parse-errors-function 666 (funcall compilation-parse-errors-function
667 limit-search 667 limit-search