;ELC ;;; Compiled ;;; in Emacs version 25.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\300\302!\207" [require rx conf-mode] 2) #@53 Return t if the current line is indented correctly. (defalias 'gitconfig-line-indented-p #[0 "\212\300 \210\301\302!\206\301\303\304 \305Q!\206\301\306!)\207" [beginning-of-line looking-at "^\\[\\_<.*?\\_>]" "^" gitconfig-indentation-string "\\_<\\(?:\\sw\\|\\s_\\)" " ?[#;]"] 4 (#$ . 476)]) #@64 Return if the point is in the indentation of the current line. (defalias 'gitconfig-point-in-indentation-p #[0 "\212`\300 \210\211`X\262)\207" [back-to-indentation] 3 (#$ . 778)]) #@26 Indent the current line. (defalias 'gitconfig-indent-line #[0 "\300 \203 \301 \2057\302 \207\303 \301 \304 \210\305 \210\306f\307\232\204\"\310 c\210\211\203,\302 \210\2021\311!b\210\306\211\223\266\202\207" [gitconfig-line-indented-p gitconfig-point-in-indentation-p back-to-indentation point-marker beginning-of-line delete-horizontal-space nil 91 gitconfig-indentation-string marker-position] 5 (#$ . 965) nil]) (defalias 'gitconfig-indentation-string #[0 "\203\302\207\303 \304\"\207" [indent-tabs-mode tab-width " " make-string 32] 3]) #@44 Syntax table to use in .gitconfig buffers. (defvar gitconfig-mode-syntax-table (byte-code "\301!\302\303\304#\210\302\305\306#\210\211\207" [conf-unix-mode-syntax-table make-syntax-table modify-syntax-entry 59 "<" 39 "."] 5) (#$ . 1522)) (defvar gitconfig-mode-font-lock-keywords (byte-code "\300\301B\302\303B\304\305B\306\307BF\207" ["^\\s-*\\[\\_<\\(\\(?:\\sw\\|\\s_\\)+\\)\\_>\\(?:\\s-+\\(\\s\".+?\\s\"\\)\\)?].*$" ((1 'font-lock-type-face t nil) (2 'font-lock-function-name-face t t)) "^\\s-*\\_<\\([[:alnum:]]\\(?:\\sw\\|\\s_\\)*\\)\\_>\\s-*\\(?:=.*\\)?$" ((1 'font-lock-variable-name-face)) "=\\s-*\\<\\(\\(?:false\\|no\\|o\\(?:ff\\|n\\)\\|true\\|yes\\)\\)\\>\\s-*$" ((1 'font-lock-keyword-face)) "=\\s-*\\<\\([[:digit:]]+\\)\\>\\s-*$" ((1 'font-lock-constant-face))] 5)) #@166 Hook run after entering Gitconfig mode. No problems result if this variable is not bound. `add-hook' automatically binds it. (This is true for all hook variables.) (defvar gitconfig-mode-hook nil (#$ . 2311)) (byte-code "\300\301!\204\f\302\301\303\304#\210\300\207" [boundp gitconfig-mode-map put definition-name gitconfig-mode] 4) (defvar gitconfig-mode-map (make-sparse-keymap)) (byte-code "\300\301N\204\302\300\301\303\304!#\210\305\306!\204\302\306\307\310#\210\300\207" [gitconfig-mode-map variable-documentation put purecopy "Keymap for `gitconfig-mode'." boundp gitconfig-mode-syntax-table definition-name gitconfig-mode] 5) (defvar gitconfig-mode-syntax-table (make-syntax-table)) (byte-code "\300\301N\204\302\300\301\303\304!#\210\302\305\306\307#\207" [gitconfig-mode-syntax-table variable-documentation put purecopy "Syntax table for `gitconfig-mode'." gitconfig-mode-abbrev-table definition-name gitconfig-mode] 5) (defvar gitconfig-mode-abbrev-table (progn (define-abbrev-table 'gitconfig-mode-abbrev-table nil) gitconfig-mode-abbrev-table)) (byte-code "\300\301N\204\302\300\301\303\304!#\210\302\305\306\307#\207" [gitconfig-mode-abbrev-table variable-documentation put purecopy "Abbrev table for `gitconfig-mode'." gitconfig-mode derived-mode-parent conf-unix-mode] 5) #@230 A major mode for editing .gitconfig files. In addition to any hooks its parent mode `conf-unix-mode' might have run, this mode runs the hook `gitconfig-mode-hook', as the final step during initialization. \{gitconfig-mode-map} (defalias 'gitconfig-mode #[0 "\306\300!\210\307\310 \210\311\312\310\313N\203\314\311\313\310\313N#\210\315 !\204'\316 \317 \"\210\320\f!\211\2035\211\321 =\203;\322\f\323 \"\210\210\324 \325\"\204R =\204R\326 \325C#\210\327 !\210\330\f!\210 \331\332 \"\210\307!\306\333!\210\334)\335\336!\207" [delay-mode-hooks major-mode mode-name gitconfig-mode-map gitconfig-mode-syntax-table gitconfig-mode-abbrev-table make-local-variable t conf-unix-mode gitconfig-mode "Gitconfig" mode-class put keymap-parent set-keymap-parent current-local-map char-table-parent standard-syntax-table set-char-table-parent syntax-table abbrev-table-get :parents abbrev-table-put use-local-map set-syntax-table conf-mode-initialize "#" indent-line-function gitconfig-indent-line run-mode-hooks gitconfig-mode-hook local-abbrev-table gitconfig-mode-font-lock-keywords indent-tabs-mode] 5 (#$ . 3616) nil]) (byte-code "\300\211\203\211@\301\302\303B\"\210A\266\202\202\210\304\303!\207" [("/\\.gitconfig\\'" "/\\.git/config\\'" "/modules/.*/config\\'" "/git/config\\'" "/\\.gitmodules\\'" "/etc/gitconfig\\'") add-to-list auto-mode-alist gitconfig-mode provide] 6)