diff options
| author | Colin Okay <okay@toyful.space> | 2022-02-23 12:56:47 -0600 |
|---|---|---|
| committer | Colin Okay <okay@toyful.space> | 2022-02-23 12:56:47 -0600 |
| commit | 5289f41dd5d2790ae94297a9652135d856baf277 (patch) | |
| tree | b807af55f594a646c3b445567594b5328e2a4574 /src/lib.lisp | |
| parent | 7f3b1cb6946cff68c9006c2694adac631f12f623 (diff) | |
changed the variable syntax in the oneliner runner
Diffstat (limited to 'src/lib.lisp')
| -rw-r--r-- | src/lib.lisp | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/lib.lisp b/src/lib.lisp index 680e93a..f596c84 100644 --- a/src/lib.lisp +++ b/src/lib.lisp @@ -176,13 +176,13 @@ the directories that appear in the value of that variable." (defun collect-positional-arguments (oneliner) (remove-duplicates (sort - (ppcre:all-matches-as-strings "\\$[1-9][0-9]*" oneliner) + (ppcre:all-matches-as-strings "#[1-9][0-9]*" oneliner) #'string<) :test #'equal)) (defun collect-named-arguments (oneliner) (remove-duplicates - (ppcre:all-matches-as-strings "\\$[a-zA-Z_][a-zA-Z0-9_]*" oneliner) + (ppcre:all-matches-as-strings "#[A-Z_][A-Z0-9_]*" oneliner) :test #'equal)) (defun handle-run-oneliner (ol &optional clip) |