From 67e217f024efd336f43f553a00480921a099542a Mon Sep 17 00:00:00 2001 From: Andreas Gerler Date: Wed, 19 Mar 2014 08:05:43 +0100 Subject: [PATCH] moved key-binding C-c C-c to cfengine3-mode-map. bound woman to C-c w. bound diff-buffer-with-file to C-c M-d. Signed-off-by: Andreas Gerler --- custom.el | 4 +++- init.el | 7 ++++++- 2 files changed, 9 insertions(+), 2 deletions(-) diff --git a/custom.el b/custom.el index 32a28c3e..cc32ada7 100644 --- a/custom.el +++ b/custom.el @@ -3,6 +3,7 @@ ;; If you edit it by hand, you could mess it up, so be careful. ;; Your init file should contain only one such instance. ;; If there is more than one, they won't work right. + '(blink-cursor-mode t) '(gnuserv-program (concat exec-directory "/gnuserv")) '(history-length 1000) '(magit-commit-signoff t) @@ -20,7 +21,8 @@ ;; Your init file should contain only one such instance. ;; If there is more than one, they won't work right. '(default ((t (:size "14pt" :family "Lucidatypewriter")))) - '(toolbar ((t (:background "Gray80" :size "8"))) t)) + '(cursor ((t (:foreground "red")))) + '(tool-bar ((t (:background "Gray80" :size "8"))))) (defcustom sql-mysql-program "/usr/local/mysql/bin/mysql" "*Command to start mysql by mysqlDB." :type 'file diff --git a/init.el b/init.el index dcd47a1a..fd4351ce 100644 --- a/init.el +++ b/init.el @@ -382,6 +382,7 @@ bundle " name " (lambda () (define-key cfengine3-mode-map "\C-cb" 'cfe-insert-bundle) (define-key cfengine3-mode-map "\C-cu" 'cfe-config-adduser) + (define-key cfengine3-mode-map "\C-c\C-c" 'compile) )) @@ -573,7 +574,11 @@ vi style of % jumping to matching brace." (define-key global-map "\C-cm" 'magit-status) -(define-key global-map "\C-c\C-c" 'compile) +(define-key global-map "\C-cw" (lambda () + (interactive) + (let ((woman-use-topic-at-point t)) + (woman)))) +(define-key global-map "\C-c\M-d" 'diff-buffer-with-file) ;;; ** Use C-+ and C-- to adjust font size -- 2.47.3