Mercurial > gui

comparison datebox.ur @ 15:8300d5f0dc19

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Replace ChangePoller with SourceL, plus some other rearrangements
author Adam Chlipala <adam@chlipala.net>
date Sun, 07 Aug 2011 14:38:52 -0400
parents 0827320b0f04
children 3a303df9ae92
comparison
equal deleted inserted replaced
14:0827320b0f04 15:8300d5f0dc19
17 panel <- TogglePanel.create format cal False; 17 panel <- TogglePanel.create format cal False;
18 18
19 return {Cal = cal, 19 return {Cal = cal,
20 Panel = panel} 20 Panel = panel}
21 21
22 fun addListener f db = 22 fun onChange db f =
23 Calendar.addListener f db.Cal 23 Calendar.onChange db.Cal f
24 24
25 fun set db day = 25 fun set db day =
26 Calendar.set db.Cal day 26 Calendar.set db.Cal day
27 27
28 fun value db = Calendar.value db.Cal 28 fun value db = Calendar.value db.Cal