Mercurial > emacs
comparison lisp/progmodes/vhdl-mode.el @ 97329:541ff411cf6f
* progmodes/vera-mode.el (vera-electric-tab):
* progmodes/vhdl-mode.el (vhdl-electric-tab): Make TAB indent
region when active.
| author | Dan Nicolaescu <dann@ics.uci.edu> |
|---|---|
| date | Wed, 06 Aug 2008 14:05:54 +0000 |
| parents | 52b7a8c22af5 |
| children | c5c8f07bc47c |
comparison
equal
deleted
inserted
replaced
| 97328:21071147464a | 97329:541ff411cf6f |
|---|---|
| 7002 toggle between normal indent and inline comment indent, | 7002 toggle between normal indent and inline comment indent, |
| 7003 else indent `correctly'." | 7003 else indent `correctly'." |
| 7004 (interactive "*P") | 7004 (interactive "*P") |
| 7005 (vhdl-prepare-search-2 | 7005 (vhdl-prepare-search-2 |
| 7006 (cond | 7006 (cond |
| 7007 ;; indent region if region is active | |
| 7008 ((and (not (featurep 'xemacs)) (use-region-p)) | |
| 7009 (vhdl-indent-region (region-beginning) (region-end) nil)) | |
| 7007 ;; expand word | 7010 ;; expand word |
| 7008 ((= (char-syntax (preceding-char)) ?w) | 7011 ((= (char-syntax (preceding-char)) ?w) |
| 7009 (let ((case-fold-search (not vhdl-word-completion-case-sensitive)) | 7012 (let ((case-fold-search (not vhdl-word-completion-case-sensitive)) |
| 7010 (case-replace nil) | 7013 (case-replace nil) |
| 7011 (hippie-expand-only-buffers | 7014 (hippie-expand-only-buffers |