Update of /cvsroot/fink/fink/perlmod/Fink
In directory fdv4jf1.ch3.sourceforge.com:/tmp/cvs-serv6532
Modified Files:
ChangeLog Engine.pm
Log Message:
xterm title-bar changes now controlled as standard fink.conf notifiers
Index: Engine.pm
===================================================================
RCS file: /cvsroot/fink/fink/perlmod/Fink/Engine.pm,v
retrieving revision 1.430
retrieving revision 1.431
diff -u -d -r1.430 -r1.431
--- Engine.pm 30 Mar 2009 20:04:25 -0000 1.430
+++ Engine.pm 3 Apr 2009 07:47:48 -0000 1.431
@@ -2034,7 +2034,8 @@
}
}
}
- print "\033]2;building " .
$package->get_fullname . " (" . ($rebuild_count - 1) . " remaining)\007";
+ my $use_xttitle = grep { /^xterm$/i }
split / /, $config->param_default('NotifyPlugin', 'Growl');
+ print "\033]2;building " .
$package->get_fullname . " (" . ($rebuild_count - 1) . " remaining)\007" if
$use_xttitle;
}
unless ($forceoff) {
@@ -2968,6 +2969,8 @@
sub prefetch {
my ($use_bindist, $dryrun, @dep_items) = @_;
+
+ my $use_xttitle = grep { /^xterm$/i } split / /,
$config->param_default('NotifyPlugin', 'Growl');
&call_queue_clear;
@@ -2976,7 +2979,7 @@
foreach my $dep (sort { $a->[PKGNAME] cmp $b->[PKGNAME] } @dep_items) {
my $func;
- print "\033]2;pre-fetching " . $dep->[PKGVER]->get_fullname . "
(" . (int(@dep_items) - ++$count) . " remaining)\007";
+ print "\033]2;pre-fetching " . $dep->[PKGVER]->get_fullname . "
(" . (int(@dep_items) - ++$count) . " remaining)\007" if $use_xttitle;
# What action do we take?
if (grep { $dep->[OP] == $_ } ($OP_REINSTALL, $OP_INSTALL)) {
@@ -3002,11 +3005,11 @@
}
if (@aptget) {
- print "\033]2;pre-fetching binaries with apt-get\007";
+ print "\033]2;pre-fetching binaries with apt-get\007" if
$use_xttitle;
&call_queue_add([ $aptget[0], 'phase_fetch_deb', 1, $dryrun,
@aptget ]);
}
- print "\033]2;\007";
+ print "\033]2;\007" if $use_xttitle;
&call_queue_clear;
}
Index: ChangeLog
===================================================================
RCS file: /cvsroot/fink/fink/perlmod/Fink/ChangeLog,v
retrieving revision 1.1586
retrieving revision 1.1587
diff -u -d -r1.1586 -r1.1587
--- ChangeLog 2 Apr 2009 21:55:04 -0000 1.1586
+++ ChangeLog 3 Apr 2009 07:47:47 -0000 1.1587
@@ -1,3 +1,8 @@
+2009-04-03 Daniel Macks <[email protected]>
+
+ * Engine.pm: fink.conf NotifyPlugin "xterm" token controls xterm
+ title-bar notifications
+
2009-04-02 Dave Morrison <[email protected]>
* PkgVersion.pm: use Services::version_cmp when comparing two
------------------------------------------------------------------------------
_______________________________________________
Fink-commits mailing list
[email protected]
http://news.gmane.org/gmane.os.apple.fink.cvs
