some change for reloading plugins
This commit is contained in:
parent
a04189e37e
commit
4ff241fe3e
|
@ -56,18 +56,19 @@ store their code templates."
|
||||||
|
|
||||||
(defun load-dir (path) "Load entire directory"
|
(defun load-dir (path) "Load entire directory"
|
||||||
(let (load-elc load-el filelist tmp)
|
(let (load-elc load-el filelist tmp)
|
||||||
(setq load-elc (concat path "*.elc"))
|
(setq load-elc (concat path "*.elc"))
|
||||||
(setq load-el (concat path "*.el"))
|
(setq load-el (concat path "*.el"))
|
||||||
(setq filelist (file-expand-wildcards load-elc))
|
(setq filelist (file-expand-wildcards load-elc))
|
||||||
(setq tmp (file-expand-wildcards load-el))
|
(setq tmp (file-expand-wildcards load-el))
|
||||||
(setq filelist (append filelist tmp))
|
(setq filelist (append filelist tmp))
|
||||||
(log (format "%s libraries found" filelist))
|
(log (format "%s libraries found" filelist))
|
||||||
;; TODO: delete unkown filetypes from filelist
|
;; TODO: delete unkown filetypes from filelist
|
||||||
(setq filelist (mapcar 'strip-el-ext filelist))
|
(setq filelist (mapcar 'strip-el-ext filelist))
|
||||||
(mapcar 'load filelist)
|
(mapcar 'load filelist)
|
||||||
)
|
)
|
||||||
)
|
)
|
||||||
|
|
||||||
|
|
||||||
(defun init-kuso () "Inittialize Kuso IDE environment"
|
(defun init-kuso () "Inittialize Kuso IDE environment"
|
||||||
(log "initializing Kuso . . .")
|
(log "initializing Kuso . . .")
|
||||||
(let (cur-path-list)
|
(let (cur-path-list)
|
||||||
|
|
|
@ -214,4 +214,4 @@ GNUEmacs."
|
||||||
)
|
)
|
||||||
)
|
)
|
||||||
)
|
)
|
||||||
(provide 'django-mode)
|
(provide 'django-mode)
|
||||||
|
|
Loading…
Reference in New Issue