e315df5ba606

Fix dumb typo
[view raw] [browse files]
author Steve Losh <steve@stevelosh.com>
date Sat, 24 Mar 2018 00:02:25 -0400
parents 20b1949e2d4b
children 5db3d9b9894b
branches/tags (none)
files src/robots/git-commands.lisp

Changes

--- a/src/robots/git-commands.lisp	Fri Mar 23 23:36:08 2018 -0400
+++ b/src/robots/git-commands.lisp	Sat Mar 24 00:02:25 2018 -0400
@@ -169,7 +169,7 @@
   ("-" :. letter [noun shellify string-upcase]))
 
 (define-string long-option%
-  !(let ((noun (shellify noun)))
+  !(let ((noun (shellify (noun))))
      $("--" :. !noun :. "=<" :. !noun :. ">"))
   ("--" :. action-verb)
   ("--" :. extremum)