-
Notifications
You must be signed in to change notification settings - Fork 0
/
Copy pathnginx-mode.elc
34 lines (28 loc) · 4.02 KB
/
nginx-mode.elc
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
;ELC
;;; Compiled by shant@ultraio on Sat Sep 27 19:36:33 2014
;;; from file /home/shant/.emacs.d/nginx-mode.el
;;; in Emacs version 24.3.1
;;; with all optimizations.
;;; This file uses dynamic docstrings, first added in Emacs 19.29.
;;; This file does not contain utf-8 non-ASCII characters,
;;; and so can be loaded in Emacs versions earlier than 23.
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
(byte-code "\300\301!\210\302\303\304\305\306\307\310\311&\210\302\312\313\314\306\315\310\311&\207" [provide nginx-mode custom-declare-variable nginx-indent-level 4 "*Indentation of Nginx statements." :type integer :group nginx nginx-indent-tabs-mode nil "*Indentation can insert tabs in nginx mode if this is non-nil." boolean] 8)
(defvar nginx-font-lock-keywords (list '("#.*" . font-lock-comment-face) '("^\\([ ]+\\)?\\([A-Za-z09_]+\\)" 2 font-lock-keyword-face t) '("^\\([ ]+\\)?rewrite[ ]+.+[ ]+\\(permanent\\|redirect\\|break\\|last\\);$" 2 font-lock-operator-face) '("\\($[0-9]+\\)[^0-9]" 1 font-lock-constant-face) '("$[A-Za-z0-9_-]+" . font-lock-variable-name-face) '("[ ]+\\(on\\|off\\);$" 1 font-lock-constant-face) '("[A-Za-z0-9_-]+\\([ ]+[^ \n]+\\)?[ ]+\\([^ \n]+\\)[ ]+{" 2 font-lock-operator-face)))
#@183 If point is in a block, return the indentation of the first line of that
block (the line containing the opening brace). Used to set the indentation
of the closing brace of a block.
(defalias 'nginx-block-indent #[nil "\212\305 \306\216`\307\310\311\312# \205A \313\314 \n#\315 \203: \fV\203: \307\310\311\312#\211\203 \313\314 \n#T\202 * \205A \316 -\207" [save-match-data-internal apoint opoint open-braces close-braces match-data ((byte-code "\301\302\"\207" [save-match-data-internal set-match-data evaporate] 3)) search-backward "{" nil t count-matches "}" 0 current-indentation] 6 (#$ . 1333)])
#@44 Return non-nil iff this line is a comment.
(defalias 'nginx-comment-line-p #[nil "\212\301 \302\216\303 \210\304\305!+\207" [save-match-data-internal match-data ((byte-code "\301\302\"\207" [save-match-data-internal set-match-data evaporate] 3)) beginning-of-line looking-at "^\\s-*#"] 2 (#$ . 1953)])
#@36 Indent current line as nginx code.
(defalias 'nginx-indent-line #[nil "\304 \210o\203 \305\306!\207\307\310 \311\312\313!\203! \203! \202c \212\n\203b \314y\210\315 \2038 o\203\"