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
37
38
39
|
Author: Gunnar Wolf <gwolf@debian.org>
Last-Update: 2013-05-27
Forwarded: no
Description: Fix elisp warnings upon installation
Some variables should be defined prior to their use.
Index: haml-elisp/haml-mode.el
===================================================================
--- haml-elisp.orig/haml-mode.el 2013-05-27 13:18:40.000000000 -0500
+++ haml-elisp/haml-mode.el 2013-05-27 13:18:39.000000000 -0500
@@ -159,6 +159,7 @@
This requires that `css-mode' is available.
`css-mode' is included with Emacs 23."
+ (defvar css-mode-syntax-table)
(when (boundp 'css-font-lock-keywords)
(haml-fontify-region beg end
css-font-lock-keywords
@@ -172,6 +173,11 @@
This requires that Karl Landström's javascript mode be available, either as the
\"js.el\" bundled with Emacs >= 23, or as \"javascript.el\" found in ELPA and
elsewhere."
+ (defvar js--font-lock-keywords-3)
+ (defvar js-font-lock-keywords-3)
+ (defvar js-mode-syntax-table)
+ (defvar javascript-mode-syntax-table)
+ (defvar js--quick-match-re-func)
(let ((keywords (or (and (featurep 'js) js--font-lock-keywords-3)
(and (featurep 'javascript-mode) js-font-lock-keywords-3)))
(syntax-table (or (and (featurep 'js) js-mode-syntax-table)
@@ -381,6 +387,8 @@
With point at the beginning of the font lock region, EXTENDER is called.
If it returns a (START . END) pair, those positions are used to possibly
extend the font lock region."
+ (defvar font-lock-beg)
+ (defvar font-lock-end)
(let ((old-beg font-lock-beg)
(old-end font-lock-end))
(save-excursion
|
