# HG changeset patch
# User Oleksandr Gavenko <gavenkoa@gmail.com>
# Date 1425209107 -7200
# Node ID 10a201706f1c28e111f84a5cec2fe245367b6579
# Parent  3ac891ab0ad67b98d15fa65c3d5db56dee97726c
Fix: Warning: assignment to free variable `dict-c5-mode-map'

Warning: reference to free variable `font-lock-beg'
Warning: reference to free variable `font-lock-end'

diff -r 3ac891ab0ad6 -r 10a201706f1c dict-mode.el
--- a/dict-mode.el	Sun Mar 01 13:21:30 2015 +0200
+++ b/dict-mode.el	Sun Mar 01 13:25:07 2015 +0200
@@ -16,7 +16,7 @@
 
 ;;; Code:
 
-(setq dict-c5-mode-map (make-sparse-keymap))
+(defvar dict-c5-mode-map (make-sparse-keymap))
 ;; (define-key dict-c5-mode-map (kbd "RET") 'my-xxx)
 
 (defvar dict-c5-font-lock-keywords
@@ -26,6 +26,10 @@
     ("\\[[^]\n]+]" . font-lock-type-face)
     ))
 
+(eval-when-compile
+  (defvar font-lock-beg)
+  (defvar font-lock-end))
+
 (defun dict-c5-font-lock-extend-region ()
   "Look for '_____' expression and extend `font-lock-beg' and `font-lock-end'."
   ;; (message "%d:%d, %d lines" font-lock-beg font-lock-end (count-lines font-lock-beg font-lock-end))