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 <baronNOSPAMbundesbrandschatzamt.de>

diff --git a/custom.el b/custom.el
index 32a28c3e7c98d75cfa0e695f1953aba2621b4dcd..cc32ada7919133011dd445830a9f8398a1659294 100644 (file)
--- 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 dcd47a1a586fedac23c719eb04ad39f7c414bca8..fd4351ce5bee69583a7b861b7e51ca8c582c15da 100644 (file)
--- 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