Mercurial > emacs
diff lisp/progmodes/verilog-mode.el @ 101002:3b3c7e10cd97
Replace last-command-char with last-command-event.
author | Glenn Morris <rgm@gnu.org> |
---|---|
date | Fri, 09 Jan 2009 04:15:52 +0000 |
parents | a9dc0e7c3f2b |
children | e2dc5f14229e |
line wrap: on
line diff
--- a/lisp/progmodes/verilog-mode.el Fri Jan 09 03:57:12 2009 +0000 +++ b/lisp/progmodes/verilog-mode.el Fri Jan 09 04:15:52 2009 +0000 @@ -2661,7 +2661,7 @@ (defun electric-verilog-semi () "Insert `;' character and reindent the line." (interactive) - (insert last-command-char) + (insert last-command-event) (if (or (verilog-in-comment-or-string-p) (verilog-in-escaped-name-p)) @@ -2686,7 +2686,7 @@ (defun electric-verilog-colon () "Insert `:' and do all indentations except line indent on this line." (interactive) - (insert last-command-char) + (insert last-command-event) ;; Do nothing if within string. (if (or (verilog-within-string) @@ -2705,7 +2705,7 @@ ;;(defun electric-verilog-equal () ;; "Insert `=', and do indentation if within block." ;; (interactive) -;; (insert last-command-char) +;; (insert last-command-event) ;; Could auto line up expressions, but not yet ;; (if (eq (car (verilog-calculate-indent)) 'block) ;; (let ((verilog-tab-always-indent nil)) @@ -2715,7 +2715,7 @@ (defun electric-verilog-tick () "Insert back-tick, and indent to column 0 if this is a CPP directive." (interactive) - (insert last-command-char) + (insert last-command-event) (save-excursion (if (progn (beginning-of-line)