Allow searching from Emacs

[nimcoon.git] / src / nimcoon.nim

diff --git a/src/nimcoon.nim b/src/nimcoon.nim
index f3b29c6d0a4892df888f3d67127f050cde403b21..e1cbb23bf562bf03cd851fd5b6a67f7d10a2cb94 100644 (file)
--- a/src/nimcoon.nim
+++ b/src/nimcoon.nim
@@ -14,7 +14,7 @@ import
 proc parseArguments(): CommandLineOptions =
   var
     searchQuery = ""
-    options = to_table({"musicOnly": false, "feelingLucky": false, "fullScreen": false, "download": false})
+    options = to_table({"musicOnly": false, "feelingLucky": false, "fullScreen": false, "download": false, "non-interactive": false})
 
   for kind, key, value in getopt():
     case kind
@@ -26,12 +26,17 @@ proc parseArguments(): CommandLineOptions =
       of "l", "lucky": options["feelingLucky"] = true
       of "f", "full-screen": options["fullScreen"] = true
       of "d", "download": options["download"] = true
+      of "n", "non-interactive": options["non-interactive"] = true
     of cmdEnd: discard
 
+  if searchQuery == "":
+    stderr.writeLine "NimCoon doesn't permit browsing. You must provide a search query."
+    quit(1)
+
   (searchQuery, options)
 
 
-proc isValidOptions*(options: Options): bool =
+proc isValidOptions(options: Options): bool =
   # Check for invalid combinations of options
   var invalidCombinations = [("musicOnly", "fullScreen"), ("download", "fullScreen")]
   result = true
@@ -56,6 +61,13 @@ proc main() =
     quit(0)
 
   let searchResults = getSearchResults(searchQuery)
+  if options["non-interactive"]:
+    for index, (title, url) in searchResults:
+      echo title
+      echo url
+      echo ""
+    quit(0)
+
   let numResults = min(limit, len(searchResults))
 
   present(searchResults, options, (0, numResults-1), player)