diff --git a/src/utils.lisp b/src/utils.lisp
index bad1db2..9705f01 100644
--- a/src/utils.lisp
+++ b/src/utils.lisp
@@ -153,7 +153,7 @@
 (defun get-command-line-option (argv optname &optional default)
   "Return the option designated by `optname' from the command-line `argv'."
   (let ((opt (member optname argv :test #'equal)))
-    (or opt default)))
+    (or (and (cdr opt) (second opt)) default)))
 
 (defun get-command-line-option-number (argv optname &optional default)
   "Return the option designated by `optname' from the command-line `argv' as a number."