From: Francois Fleuret Date: Wed, 2 Aug 2017 06:05:46 +0000 (+0200) Subject: Update. X-Git-Url: https://fleuret.org/cgi-bin/gitweb/gitweb.cgi?a=commitdiff_plain;h=dec839751ebc5e22f91748a6b225955765176937;p=elisp.git Update. --- diff --git a/emacs.el b/emacs.el index 1d2d66f..037615f 100644 --- a/emacs.el +++ b/emacs.el @@ -1202,6 +1202,7 @@ goback argument, go back where we were." ) (defun ff/git-pull () (interactive) + (message "git pull ...") (shell-command "git pull" nil) ) @@ -2117,7 +2118,7 @@ a file in /tmp" (setq compilation-read-command t compile-command "make -j -k" - compile-history '("make clean" "make DEBUG=yes -j -k" "make -j -k") + ;; compile-history '("make clean" "make DEBUG=yes -j -k" "make -j -k") ) (defun ff/universal-compile (universal) (interactive "P") @@ -2634,6 +2635,14 @@ with a time tag, and save this file" (setq ff/map (make-sparse-keymap)) (define-key global-map [(control \`)] ff/map) +;; (defun ff/start-stop-macro-recording () (interactive) + ;; (if (or defining-kbd-macro executing-kbd-macro) + ;; (kmacro-end-macro) + ;; (kmacro-start-macro)) + ;; ) + +;; (define-key global-map [(shift return)] 'ff/start-stop-macro-recording) + (unless window-system ;; (define-key global-map [(control @)] ff/map) (define-key global-map [(meta O) \`] ff/map)