[devel] [alterator] синхронность activity

[Michael Shigorin]

	Здравствуйте.
Помогите сняться с ручника:

(extra-button (when clicked
                (begin
                  (format #t "HERE1\n")
                  (extra-button activity #f)
                  (form-update-activity '("extra-button") #f)
                  (format #t "HERE2\n")
                  (commit-interface)
                  (format #t "HERE3\n")
                  )))

Кнопка деактивируется уже после возврата commit-interface,
которое представляет из себя ходока в бэкенд:

(define (commit-interface)
  (catch/message
    (lambda()
      (woo-write "/backend" 'var (form-value "var")))))

Т.е. в выводе наблюдаю:

HERE1
HERE2
[выполнение команд бэкендом]
HERE3

...и при этом на HERE2 extra-button нажимабельная,
а после HERE3 -- уже нет.

-- 
 ---- WBR, Michael Shigorin <mike на altlinux.ru>
  ------ Linux.Kiev http://www.linux.kiev.ua/