diff options
author | Tom Willemsen | 2013-03-28 00:52:48 +0100 |
---|---|---|
committer | Tom Willemsen | 2013-03-28 00:52:48 +0100 |
commit | 933a51ed707158c4c0eee879e3a4db885d644cc6 (patch) | |
tree | 5b35c3db29aee1e3f939c275ea3cd3ffd0cbf56f | |
parent | dfd6f71c4d72002c8afda0f281507fda22b9ab29 (diff) | |
download | clark-933a51ed707158c4c0eee879e3a4db885d644cc6.tar.gz clark-933a51ed707158c4c0eee879e3a4db885d644cc6.zip |
Change order of script output
The order of parameters for `--script' and without it was different,
to keep things simple these should be the same.
-rw-r--r-- | js/clark.js | 6 | ||||
-rw-r--r-- | lisp/clark.lisp | 2 |
2 files changed, 4 insertions, 4 deletions
diff --git a/js/clark.js b/js/clark.js index b1ea691..80eff5d 100644 --- a/js/clark.js +++ b/js/clark.js @@ -148,9 +148,9 @@ function clark_complete(input, pos, conservative) }); let c = { count: ret.length, - get_string: function (i) ret[i][0], - get_description: function (i) ret[i][1], - get_input_state: function (i) [ret[i][2]] }; + get_string: function (i) ret[i][1], + get_description: function (i) ret[i][2], + get_input_state: function (i) [ret[i][0]] }; yield co_return(c); } } diff --git a/lisp/clark.lisp b/lisp/clark.lisp index cefc1a3..f061c23 100644 --- a/lisp/clark.lisp +++ b/lisp/clark.lisp @@ -194,7 +194,7 @@ BM should be a list containing the url, name and description of the bookmark." (destructuring-bind (url name description) bm (if *script* - (format t "~A~A~A" name description url) + (format t "~A~A~A" url name description) (format t "~A~% ~A~% ~A~%~%" url name description)))) (defcommand add (url name description &rest tags) |