diff --git a/src/lib/modes.el b/src/lib/modes.el index 98d0fa5..9c7b336 100644 --- a/src/lib/modes.el +++ b/src/lib/modes.el @@ -109,6 +109,7 @@ This mode provide a basic configuration for an IDE." (run-hooks 'kuso-plugin-postinit-hook) ;; after mode was initialized (run-hooks 'kuso-postinit-mode-hook) + (message "<<< %s" kuso-postinit-mode-hook) ) ;; kuso-mode already loaded (let () diff --git a/src/plugins/cproject.el b/src/plugins/cproject.el index 7c0108d..420969a 100644 --- a/src/plugins/cproject.el +++ b/src/plugins/cproject.el @@ -71,9 +71,11 @@ binding for Kuso IDE C projects section." ;; --------------------------------------------------------------------- ;; Functions ;; --------------------------------------------------------------------- -(defun init-menus () "Draw required menu for C mode" +(defun cplugin/init-menus () "Draw required menu for C mode" + (interactive) (define-key-after global-map [menu-bar file new-proj cproj] (cons "C/C++" (make-sparse-keymap "c-cpp-proj"))) + (log "B") ;; (define-key global-map (kbd "\C-x n k") 'kmodule) ;; (define-key global-map [menu-bar file new-proj cproj kmodule] '("Kernel Module" . kmodule)) @@ -92,6 +94,7 @@ binding for Kuso IDE C projects section." (define-key global-map (kbd "\C-x n c") 'generic-c) (define-key global-map [menu-bar file new-proj cproj cgeneric] '("Generic project (C)" . generic-c)) + (log "C") ) @@ -132,19 +135,17 @@ binding for Kuso IDE C projects section." (kuso-cplugin-mode) ) + (defun initial-keymap () "Set the key binding for C project." (define-key kuso-cplugin-map (kbd "\C-c \C-c") 'compile) ) - - - - ;; Initializing c menus at the load time -(add-hook 'kuso-postinit-mode-hook 'init-menus) - +(add-hook 'kuso-postinit-mode-hook 'cplugin/init-menus) +(add-hook 'kuso-plugin-init-hook 'kuso-cplugin-mode) +(log "AAA") ;; ---------------------------------------------------------------------- ;; Minor Modes ;; ---------------------------------------------------------------------- @@ -162,6 +163,7 @@ This mode provide C language plugin for Kuso IDE." ;; before initiazing mode (run-hooks 'kuso-cplug-preinit-hook) (initial-keymap) + (log "Z") ;; after mode was initialized (run-hooks 'kuso-cplug-postinit-hook) )