branch: elpa/javelin
commit f3403de30ae309e56f113873bb7970d1d6c4e5d4
Author: Otávio Schwanck dos Santos <[email protected]>
Commit: Otávio Schwanck dos Santos <[email protected]>
fix hydra
---
harpoon.el | 30 ++++++++++++++++++++----------
1 file changed, 20 insertions(+), 10 deletions(-)
diff --git a/harpoon.el b/harpoon.el
index c1b82dd6783..224a853552e 100644
--- a/harpoon.el
+++ b/harpoon.el
@@ -145,7 +145,8 @@
"Sanitize word to save file. STRING: String to sanitize."
(s-replace-regexp "/" "---" string))
-(defun harpoon--go-to (line-number)
+;;;###autoload
+(defun harpoon-go-to (line-number)
"Go to specific file on harpoon (by line order). LINE-NUMBER: Line to go."
(let* ((file-name (s-replace-regexp "\n" ""
(shell-command-to-string
@@ -167,46 +168,55 @@
(harpoon-delete-item))
+;;;###autoload
(defun harpoon-delete-1 ()
"Delete item harpoon on position 1."
(interactive)
(harpoon--delete 1))
+;;;###autoload
(defun harpoon-delete-2 ()
"Delete item harpoon on position 1."
(interactive)
(harpoon--delete 2))
+;;;###autoload
(defun harpoon-delete-3 ()
"Delete item harpoon on position 1."
(interactive)
(harpoon--delete 3))
+;;;###autoload
(defun harpoon-delete-4 ()
"Delete item harpoon on position 1."
(interactive)
(harpoon--delete 4))
+;;;###autoload
(defun harpoon-delete-5 ()
"Delete item harpoon on position 1."
(interactive)
(harpoon--delete 5))
+;;;###autoload
(defun harpoon-delete-6 ()
"Delete item harpoon on position 1."
(interactive)
(harpoon--delete 6))
+;;;###autoload
(defun harpoon-delete-7 ()
"Delete item harpoon on position 1."
(interactive)
(harpoon--delete 7))
+;;;###autoload
(defun harpoon-delete-8 ()
"Delete item harpoon on position 1."
(interactive)
(harpoon--delete 8))
+;;;###autoload
(defun harpoon-delete-9 ()
"Delete item harpoon on position 1."
(interactive)
@@ -216,55 +226,55 @@
(defun harpoon-go-to-1 ()
"Go to file 1 on harpoon."
(interactive)
- (harpoon--go-to 1))
+ (harpoon-go-to 1))
;;;###autoload
(defun harpoon-go-to-2 ()
"Go to file 2 on harpoon."
(interactive)
- (harpoon--go-to 2))
+ (harpoon-go-to 2))
;;;###autoload
(defun harpoon-go-to-3 ()
"Go to file 3 on harpoon."
(interactive)
- (harpoon--go-to 3))
+ (harpoon-go-to 3))
;;;###autoload
(defun harpoon-go-to-4 ()
"Go to file 4 on harpoon."
(interactive)
- (harpoon--go-to 4))
+ (harpoon-go-to 4))
;;;###autoload
(defun harpoon-go-to-5 ()
"Go to file 5 on harpoon."
(interactive)
- (harpoon--go-to 5))
+ (harpoon-go-to 5))
;;;###autoload
(defun harpoon-go-to-6 ()
"Go to file 6 on harpoon."
(interactive)
- (harpoon--go-to 6))
+ (harpoon-go-to 6))
;;;###autoload
(defun harpoon-go-to-7 ()
"Go to file 7 on harpoon."
(interactive)
- (harpoon--go-to 7))
+ (harpoon-go-to 7))
;;;###autoload
(defun harpoon-go-to-8 ()
"Go to file 8 on harpoon."
(interactive)
- (harpoon--go-to 8))
+ (harpoon-go-to 8))
;;;###autoload
(defun harpoon-go-to-9 ()
"Go to file 9 on harpoon."
(interactive)
- (harpoon--go-to 9))
+ (harpoon-go-to 9))
;;;###autoload
(defun harpoon-add-file ()
