monotone

monotone Commit Details

Date:2009-01-18 12:02:28 (10 years 5 months ago)
Author:Tony Cooper
Branch:net.venge.monotone.contrib.mtn-browse
Commit:a676e2d666b088c8801f0023cbb0eff84782fb12
Parents: d077cb27b7487d5b718f0e4cd87b5ea3c0b9315f
Message:- The help system now works, at long last. Have yet to write the help files

though.
- Dealt with the blank screens on startup problem.
Changes:
Mmtn-browse (2 diffs)

File differences

mtn-browse
175175
176176
177177
178
178
179
180
181
179182
180183
181184
......
281284
282285
283286
284
285
287
288
289
286290
287
291
288292
289293
290294
291
292
293
294
295
295
296
297
298
296299
297
298
300
301
299302
303
304
300305
301306
302307
303308
304309
305310
306
311
312
307313
308
309
310
311
314
315
316
312317
313318
314319
# Initialise stuff.
Gnome2::Program->init("mtn-browse", 0.51);
Gnome2::Program->init("mtn-browse",
0.51,
undef,
app_datadir => PREFIX_DIR . "/share");
setup_sigchld_handler(\&sigchld_handler);
$glade_file = LIB_DIR . "/ui/mtn-browse.glade";
$tooltips = Gtk2::Tooltips->new();
\&mtn_error_handler);
# Create the browser window and display it. Please note that updating the
# browser to reflect the current workspace is done in an idle handler so
# that control can be handed over to Gtk2 before updating the display.
# browser to reflect the current database or workspace is done in an idle
# handler so that control can be handed over to Gtk2 before updating the
# display.
$browser = get_browser_window($mtn);
$browser = get_browser_window();
if (defined($mtn))
{
setup_mtn_object($mtn, $browser->{window});
if (defined($branch))
{
Glib::Idle->add
(sub {
my $browser = $_[0];
$browser->{mtn} = $mtn;
Glib::Idle->add
(sub {
my $browser = $_[0];
return if ($browser->{in_cb});
local $browser->{in_cb} = 1;
return if ($browser->{in_cb});
local $browser->{in_cb} = 1;
if (defined($branch))
{
$browser->{branch_combo_details}->{preset} = 1;
$browser->{branch_combo_details}->{value} = $branch;
$browser->{revision_combo_details}->{preset} = 1;
$browser->{revision_combo_details}->{value} =
$revision_id;
$browser->{tagged_checkbutton}->set_active(FALSE);
&{$browser->{update_handler}}($browser, ALL_CHANGED);
}
&{$browser->{update_handler}}($browser, DATABASE_CHANGED);
return FALSE;
},
$browser);
}
return FALSE;
},
$browser);
}
$mtn = undef;

Archive Download the corresponding diff file

Branches

Tags

Quick Links:     www.monotone.ca    -     Downloads    -     Documentation    -     Wiki    -     Code Forge    -     Build Status