null+****@clear*****
null+****@clear*****
Mon Jun 4 16:07:55 JST 2012
yuta yamada 2012-06-04 16:07:55 +0900 (Mon, 04 Jun 2012) New Revision: 55a612722fedabbd0f7372171e041ce75cceed7b Log: move the defvars to below of the defcustoms Modified files: logalimacs.el Modified: logalimacs.el (+7 -9) =================================================================== --- logalimacs.el 2012-06-04 15:58:13 +0900 (e3e6d0e) +++ logalimacs.el 2012-06-04 16:07:55 +0900 (74b6093) @@ -48,9 +48,6 @@ :group 'logalimacs :type 'boolean) -(defvar loga-fly-mode nil - "if nonnil, logalimacs use loga-fly-mode") - (defcustom loga-fly-mode-interval 1 "timer-valiable for loga-fly-mode, credit par sec." :group 'logalimacs @@ -74,12 +71,6 @@ :group 'logalimacs :type 'integer) -(defvar loga-word-cache nil "cache word used by loga-lookup") -(defvar loga-current-command nil "get executed current command-name and symbol") -(defvar loga-current-endpoint nil "store current endpoint symbol") -(defvar loga-current-max-length nil) -(defvar loga-base-buffer nil) - (defcustom loga-width-limit-source 30 "limit of width of source word" :group 'logalimacs @@ -95,6 +86,13 @@ :group 'logalimacs :type 'boolean) +(defvar loga-fly-mode nil "if nonnil, logalimacs use loga-fly-mode") +(defvar loga-word-cache nil "cache word used by loga-lookup") +(defvar loga-current-command nil "get executed current command-name and symbol") +(defvar loga-current-endpoint nil "store current endpoint symbol") +(defvar loga-current-max-length nil) +(defvar loga-base-buffer nil) + (defvar loga-command-alist '((?a . :add) (?c . :config)