summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorClément Lassieur <clement.lassieur@parrot.com>2019-03-28 15:26:09 +0100
committerClément Lassieur <clement@lassieur.org>2019-04-02 10:49:14 +0200
commit3d0976370c12747290b8ed8a7d75845c867abc4c (patch)
treefd8df4726ca394e8269abb40a804d72939f43ffa
parent017e9b4679025ffc3d4f3030c6384210ba75d972 (diff)
downloademacs-3d0976370c12747290b8ed8a7d75845c867abc4c.tar.gz
emacs: add my-tw8819-gtags
-rw-r--r--stow/home/.emacs.d/conf/my-parrot.el8
1 files changed, 8 insertions, 0 deletions
diff --git a/stow/home/.emacs.d/conf/my-parrot.el b/stow/home/.emacs.d/conf/my-parrot.el
index 76bd8bd..e07e929 100644
--- a/stow/home/.emacs.d/conf/my-parrot.el
+++ b/stow/home/.emacs.d/conf/my-parrot.el
@@ -79,6 +79,14 @@ there is other stuff in `buf', a region can be used. `product' could be
org-babel-default-header-args:screen)))
;;;###autoload
+(defun my-tw8819-gtags ()
+ "As root."
+ (interactive)
+ (let ((command "cd /parrotnas/loki/1_Project/5_Software/5.8_GCS/TW8819 && sudo rm -f GPATH GRTAGS GTAGS && sudo gtags -v"))
+ (org-babel-execute:screen (format "%s\n" command)
+ org-babel-default-header-args:screen)))
+
+;;;###autoload
(defun my-linux-gtags (path)
(let ((command
(mapconcat