From mboxrd@z Thu Jan  1 00:00:00 1970
Return-Path: <manowar@altlinux.org>
Message-ID: <4FACF06C.3000708@altlinux.org>
Date: Fri, 11 May 2012 14:56:44 +0400
From: Paul Wolneykien <manowar@altlinux.org>
Organization: ALT Linux
User-Agent: Mozilla/5.0 (X11; Linux armv7l;
	rv:12.0) Gecko/20120430 Thunderbird/12.0.1
MIME-Version: 1.0
To: devel@lists.altlinux.org
References: <20120511043856.GT30123@osdn.org.ua> <4FACD02F.6050307@cg.ru>
	<4FACDD11.50507@altlinux.org> <4FACEF6B.1030902@cg.ru>
In-Reply-To: <4FACEF6B.1030902@cg.ru>
Content-Type: text/plain; charset=UTF-8; format=flowed
Content-Transfer-Encoding: 8bit
Subject: Re: [devel] =?utf-8?b?W2FsdGVyYXRvcl0g0YHQuNC90YXRgNC+0L3QvdC+0YE=?=
 =?utf-8?b?0YLRjCBhY3Rpdml0eQ==?=
X-BeenThere: devel@lists.altlinux.org
X-Mailman-Version: 2.1.12
Precedence: list
Reply-To: ALT Linux Team development discussions <devel@lists.altlinux.org>
List-Id: ALT Linux Team development discussions <devel.lists.altlinux.org>
List-Unsubscribe: <https://lists.altlinux.org/mailman/options/devel>,
	<mailto:devel-request@lists.altlinux.org?subject=unsubscribe>
List-Archive: <http://lists.altlinux.org/pipermail/devel>
List-Post: <mailto:devel@lists.altlinux.org>
List-Help: <mailto:devel-request@lists.altlinux.org?subject=help>
List-Subscribe: <https://lists.altlinux.org/mailman/listinfo/devel>,
	<mailto:devel-request@lists.altlinux.org?subject=subscribe>
X-List-Received-Date: Fri, 11 May 2012 10:56:45 -0000
Archived-At: <http://lore.altlinux.org/devel/4FACF06C.3000708@altlinux.org/>
List-Archive: <http://lore.altlinux.org/devel/>
List-Post: <mailto:devel@altlinux.org>

11.05.2012 14:52, Lenar Shakirov написал:
> 11.05.2012 13:34, Paul Wolneykien пишет:
>> 11.05.2012 12:39, Lenar Shakirov написал:
>>> 11.05.2012 08:38, 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,
>>>> которое представляет из себя ходока в бэкенд:
>>
>> А сама процедура extra-button что из себя представляет?
>
> extra-button это кнопка:
> (document:id extra-button (button (_ "My button")))
>

   Это что, qt-интерфейс? А для чего тогда form-update-activity 
используется?