+proc parseOptions(): CommandLineOptions =
+ var
+ searchQuery = ""
+ musicOnly = false
+ feelingLucky = false
+ fullScreen = false
+
+ for kind, key, value in getopt():
+ case kind
+ of cmdArgument:
+ searchQuery = key
+ of cmdShortOption, cmdLongOption:
+ case key
+ of "m", "music": musicOnly = true
+ of "l", "lucky": feelingLucky = true
+ of "f", "full-screen": fullScreen = true
+ of cmdEnd:
+ discard
+
+ return (searchQuery, musicOnly, feelingLucky, fullScreen)
+