scsh-conservatory
/
commander-s
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

propagate key-messages to plugin if result-buffer has focus? (didn't 

work for the enter key...)
This commit is contained in:
eknauel 2005-05-26 11:34:35 +00:00
parent e549cc27ff
commit eb5fff8905
1 changed files with 2 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
scheme/nuit-engine.scm
View File

@ -132,6 +132,7 @@
(current-history-entry-selector-maker history-entry-result)) (current-history-entry-selector-maker history-entry-result))
(define (update-current-result! new-value) (define (update-current-result! new-value)
(debug-message "update-current-result! " new-value)
(cond (cond
((current-history-item) ((current-history-item)
=> (lambda (entry) => (lambda (entry)
@ -341,7 +342,7 @@
(refresh-result-window) (refresh-result-window)
(loop (wait-for-input) c-x-pressed?)) (loop (wait-for-input) c-x-pressed?))
((= ch 10) ((and (focus-on-command-buffer?) (= ch 10))
(handle-return-key) (handle-return-key)
(loop (wait-for-input) c-x-pressed?)) (loop (wait-for-input) c-x-pressed?))