summaryrefslogtreecommitdiff
path: root/emacs
diff options
context:
space:
mode:
Diffstat (limited to 'emacs')
-rw-r--r--emacs/elisp/my-work.el11
1 files changed, 11 insertions, 0 deletions
diff --git a/emacs/elisp/my-work.el b/emacs/elisp/my-work.el
index bdd917c..f0c59d8 100644
--- a/emacs/elisp/my-work.el
+++ b/emacs/elisp/my-work.el
@@ -6,5 +6,16 @@
"Return t if this is a work machine."
(string-match "HQ\\.*" (system-name)))
+(defun my/work-code-search ()
+ "Search code on sourcegraph for a given language."
+ (interactive)
+ (let ((language (completing-read
+ "Language: "
+ '("Ruby" "Python" "Go")))
+ (code (read-string "Code: ")))
+ (browse-url
+ (concat "https://sourcegraph.rbx.com/search?q=context:global+lang:" language
+ "+" code))))
+
(provide 'my-work)
;;; my-work.el ends here