...
|
...
|
@@ -135,6 +135,10 @@
|
135
|
135
|
(and (= :right direction)
|
136
|
136
|
(some-> cmd :suggestions :selected)) (do (.preventDefault event)
|
137
|
137
|
(merge cmd (complete-suggestion cmd)))
|
|
138
|
+ (and tab
|
|
139
|
+ (= 1 (some-> cmd :suggestions :options count))
|
|
140
|
+ (some-> cmd :suggestions :selected)) (do (.preventDefault event)
|
|
141
|
+ (merge cmd (complete-suggestion cmd)))
|
138
|
142
|
tab (do (.preventDefault event)
|
139
|
143
|
(merge cmd (cycle-suggestions cmd :forward)))
|
140
|
144
|
(and escape (some-> cmd :suggestions :options)) (do (.preventDefault event)
|