Mercurial > emacs
comparison lisp/progmodes/verilog-mode.el @ 104774:468b7fa34d2c
Use forward-line rather than goto-line.
author | Glenn Morris <rgm@gnu.org> |
---|---|
date | Tue, 01 Sep 2009 03:18:44 +0000 |
parents | 73bff1db57b6 |
children | df4934f25eef |
comparison
equal
deleted
inserted
replaced
104773:380c4c2a4fc2 | 104774:468b7fa34d2c |
---|---|
4069 (setq name (expand-file-name filename name))) | 4069 (setq name (expand-file-name filename name))) |
4070 (setq buffer | 4070 (setq buffer |
4071 (and (file-exists-p name) | 4071 (and (file-exists-p name) |
4072 (find-file-noselect name)))))))) | 4072 (find-file-noselect name)))))))) |
4073 (switch-to-buffer buffer) | 4073 (switch-to-buffer buffer) |
4074 (goto-line (string-to-number line)) | 4074 (goto-char (point-min)) |
4075 (forward-line (- (string-to-number line))) | |
4075 (end-of-line) | 4076 (end-of-line) |
4076 (catch 'already | 4077 (catch 'already |
4077 (cond | 4078 (cond |
4078 ((verilog-in-slash-comment-p) | 4079 ((verilog-in-slash-comment-p) |
4079 (re-search-backward "//") | 4080 (re-search-backward "//") |