cmd-modeはMS-DOSのバッチファイル(拡張子が.bat)や、Windows NT コマンドスクリプトファイル(拡張子が.cmd)等を編集する為の、Emacsのメジャーモードです。
リビジョン | 0a6d7cdb93971ba609d75eefda3cf0a964db1208 (tree) |
---|---|
日時 | 2001-08-31 22:25:50 |
作者 | tfuruka1 <tfuruka1> |
コミッター | tfuruka1 |
●SETの環境変数にキーワード文字列が含まれていると、色付けが変になる問題
●SET /A の時に演算子の一部を環境変数として、間違えて色付けする問題を
@@ -16,15 +16,21 @@ | ||
16 | 16 | ;; auto-mode-alist)) |
17 | 17 | ;; |
18 | 18 | ;; |
19 | -;; $Id: cmd-mode.el,v 1.1 2001/08/28 13:14:43 tfuruka1 Exp $ | |
19 | +;; $Id: cmd-mode.el,v 1.2 2001/08/31 13:25:50 tfuruka1 Exp $ | |
20 | 20 | ;; $Log: cmd-mode.el,v $ |
21 | +;; Revision 1.2 2001/08/31 13:25:50 tfuruka1 | |
22 | +;; ●SETの環境変数にキーワード文字列が含まれていると、色付けが変になる問題 | |
23 | +;; を修正 | |
24 | +;; ●SET /A の時に演算子の一部を環境変数として、間違えて色付けする問題を | |
25 | +;; 修正 | |
26 | +;; | |
21 | 27 | ;; Revision 1.1 2001/08/28 13:14:43 tfuruka1 |
22 | 28 | ;; Initial revision |
23 | 29 | ;; |
24 | 30 | |
25 | 31 | ;; (replace-regexp "[\t ]+$" "") |
26 | 32 | |
27 | -(defconst cmd-mode-revision-number "$Revision: 1.1 $" "cmd-modeのRevision") | |
33 | +(defconst cmd-mode-revision-number "$Revision: 1.2 $" "cmd-modeのRevision") | |
28 | 34 | |
29 | 35 | ;;; *** hook |
30 | 36 | (defvar cmd-mode-hook nil |
@@ -73,7 +79,7 @@ | ||
73 | 79 | (concat "\\b" |
74 | 80 | "\\(set\\b\\)\\([ \t]+/a\\)*" |
75 | 81 | "\\(\\([ \t]+[_A-Za-z-][_A-Za-z0-9-]*\\)*\\)" |
76 | - "\\(-\\|\\W\\)*") | |
82 | + "\\([-+/\\*]\\|\\W\\)*") | |
77 | 83 | "SETコマンドの正規表現") |
78 | 84 | (defvar cmd-label-pattern "^[ \t]*\\(:[:A-Za-z0-9_-]+\\)" |
79 | 85 | "ラベルの正規表現") |
@@ -119,6 +125,11 @@ ECHO. | ||
119 | 125 | '(2 font-lock-keyword-face) ;rem |
120 | 126 | '(3 font-lock-comment-face) ;コメント文字 |
121 | 127 | ) |
128 | + ;; SET | |
129 | + (list cmd-set-pattern | |
130 | + '(1 font-lock-keyword-face) ;SET | |
131 | + '(3 font-lock-type-face) ;環境変数名 | |
132 | + ) | |
122 | 133 | ;; ラベル |
123 | 134 | (list cmd-label-pattern |
124 | 135 | '(1 (cons font-lock-function-name-face '(underline)))) |
@@ -128,11 +139,6 @@ ECHO. | ||
128 | 139 | (list cmd-variable-pattern 1 font-lock-variable-name-face) |
129 | 140 | ;; 内部コマンド |
130 | 141 | (list cmd-command-pattern 1 font-lock-keyword-face) |
131 | - ;; SET | |
132 | - (list cmd-set-pattern | |
133 | - '(1 font-lock-keyword-face) ;SET | |
134 | - '(3 font-lock-type-face) ;環境変数名 | |
135 | - ) | |
136 | 142 | ;;条件付き処理記号等 |
137 | 143 | (list cmd-const-pattern 1 font-lock-constant-face) |
138 | 144 | ;; IF文とFOR文のオプション等 |
@@ -233,7 +239,7 @@ ECHO. | ||
233 | 239 | |
234 | 240 | (use-local-map cmd-help-local-map) ; ローカルマップの使用宣言 |
235 | 241 | |
236 | - ;; お化粧の設定 | |
242 | + ;; フォントロックの設定 | |
237 | 243 | (make-local-variable 'font-lock-defaults) |
238 | 244 | (setq font-lock-defaults |
239 | 245 | '((cmd-font-lock-keywords) t t)) |