-
Notifications
You must be signed in to change notification settings - Fork 0
/
Copy pathyatt-autoload.el
36 lines (26 loc) · 1022 Bytes
/
yatt-autoload.el
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
34
35
36
;;
;;
;;
(add-to-list 'load-path
(file-name-directory load-file-name))
(autoload 'yatt-mode "yatt-mode"
"YATT mode" t)
(defvar yatt-mode-file-coding 'utf-8 "file coding for yatt files.")
(let ((yatt-ext "\\.\\(yatt\\|ytmpl\\)\\'"))
(add-to-list 'auto-mode-alist `(,yatt-ext . yatt-mode))
(add-to-list 'auto-mode-alist '("\\.ydo\\'" . cperl-mode))
(add-to-list 'file-coding-system-alist
`(,yatt-ext . ,yatt-mode-file-coding)))
;;
(autoload 'yatt-lint-any-mode "yatt-lint-any-mode"
"auto lint for yatt and others." t)
(autoload 'yatt-lint-any-mode-unless-blacklisted "yatt-lint-any-mode"
"To turn on yatt-lint unless after-save-hook contains blacklisted." t)
(defvar yatt-lint-any-mode-blacklist '(flymake-mode flycheck-mode)
"Avoid yatt-lint if any of modes in this list are t")
(add-hook 'cperl-mode-hook
'yatt-lint-any-mode-unless-blacklisted
t)
(message "cperl-mode-hook is: %s" cperl-mode-hook)
;;
(autoload 'plist-bind "yatt-utils" "plist alternative of multivalue-bind" t)