X-Git-Url: http://njoseph.me/gitweb/nimcoon.git/blobdiff_plain/0266d1d4c934aa9e29769dcb0d5e3d21bda282cd..a2d28598f44142969997ae56f6bd684c54d95e0b:/nimcoon.el diff --git a/nimcoon.el b/nimcoon.el index c238fc1..90f15e4 100644 --- a/nimcoon.el +++ b/nimcoon.el @@ -1,5 +1,6 @@ ;;; nimcoon.el -*- lexical-binding: t; -*- ;;; +;;; Commentary ;;; Usage in Doom Emacs ;;; Place or symlink the file into ~/.doom.d/ ;;; (load! "nimcoon") @@ -19,6 +20,13 @@ "Search by QUERY and play in NimCoon." (call-process "nimcoon" nil 0 nil args query)) +(defun nimcoon-search(args query) + "Search by QUERY with the given ARGS." + (with-output-to-temp-buffer "*NimCoon search results*" + (call-process "nimcoon" nil "*NimCoon search results*" t args query) + (with-current-buffer "*NimCoon search results*" + (org-mode)))) + ;;; Interactive functions (defun nimcoon-feeling-lucky-music(query) (interactive "sSearch query: ") @@ -42,13 +50,6 @@ (interactive) (shell-command "kill `pgrep nimcoon` `pgrep mpv` `pgrep vlc`")) -(defun nimcoon-search(args query) - "Search by QUERY with the given ARGS." - (with-output-to-temp-buffer "*NimCoon search results*" - (call-process "nimcoon" nil "*NimCoon search results*" t args query) - (with-current-buffer "*NimCoon search results*" - (org-mode)))) - (defun nimcoon-search-video(query) "Search for a video by QUERY." (interactive "sSearch query: ") @@ -72,3 +73,5 @@ :desc "Kill" "k" #'nimcoon-kill-background-processes :desc "Video" "v" #'nimcoon-feeling-lucky-video :desc "Music" "m" #'nimcoon-feeling-lucky-music)) + +;;; nimcoon.el ends here