From a5a08b1f3beddc9bb774a6e5ae51059951b2def0 Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Fri, 25 Jan 2002 05:06:14 +0000 Subject: [PATCH] Comment change. --- lisp/info-look.el | 2 +- lisp/progmodes/vhdl-mode.el | 2 +- 2 files changed, 2 insertions(+), 2 deletions(-) diff --git a/lisp/info-look.el b/lisp/info-look.el index e7aedf47f59..ec5e779d36a 100644 --- a/lisp/info-look.el +++ b/lisp/info-look.el @@ -369,7 +369,7 @@ If optional argument QUERY is non-nil, query for the help mode." (goto-char (match-beginning 0)) (and (display-color-p) info-lookup-highlight-face ;; Search again for ITEM so that the first - ;; occurence of ITEM will be highlighted. + ;; occurrence of ITEM will be highlighted. (re-search-forward (regexp-quote item)) (let ((start (match-beginning 0)) (end (match-end 0))) diff --git a/lisp/progmodes/vhdl-mode.el b/lisp/progmodes/vhdl-mode.el index e41c9bd58ef..e3285595491 100644 --- a/lisp/progmodes/vhdl-mode.el +++ b/lisp/progmodes/vhdl-mode.el @@ -8193,7 +8193,7 @@ but not if inside a comment or quote)." (setq prompt (match-string 1)) (replace-match "") (setq string (vhdl-template-field prompt nil t)) - ;; replace occurences of same prompt + ;; replace occurrences of same prompt (while (re-search-forward (concat "<\\(" prompt "\\)>") end t) (replace-match (or string ""))) (goto-char position))) -- 2.39.5