summaryrefslogtreecommitdiffstats
path: root/perl-install/standalone/drakxtv
diff options
context:
space:
mode:
authorThierry Vignaud <tvignaud@mandriva.org>2002-02-26 12:47:42 +0000
committerThierry Vignaud <tvignaud@mandriva.org>2002-02-26 12:47:42 +0000
commit3b5efdd9e04da2c23f7cf868b612b6c51b6a8c1d (patch)
tree430d88fa7196f6b6dc89b3d3250cfe39ec5ffc7d /perl-install/standalone/drakxtv
parent3cba76ad3eec3fbbba1fb4f77b3bcc07671f2896 (diff)
downloaddrakx-backup-do-not-use-3b5efdd9e04da2c23f7cf868b612b6c51b6a8c1d.tar
drakx-backup-do-not-use-3b5efdd9e04da2c23f7cf868b612b6c51b6a8c1d.tar.gz
drakx-backup-do-not-use-3b5efdd9e04da2c23f7cf868b612b6c51b6a8c1d.tar.bz2
drakx-backup-do-not-use-3b5efdd9e04da2c23f7cf868b612b6c51b6a8c1d.tar.xz
drakx-backup-do-not-use-3b5efdd9e04da2c23f7cf868b612b6c51b6a8c1d.zip
update comments
Diffstat (limited to 'perl-install/standalone/drakxtv')
-rwxr-xr-xperl-install/standalone/drakxtv7
1 files changed, 4 insertions, 3 deletions
diff --git a/perl-install/standalone/drakxtv b/perl-install/standalone/drakxtv
index 1cf1b4137..d4b7e83f0 100755
--- a/perl-install/standalone/drakxtv
+++ b/perl-install/standalone/drakxtv
@@ -21,6 +21,7 @@
# If we ever want to autoconf the tv card at install time, we should
# make a package out of this.
# Maybe we'll have to for harddrake2
+#
#package tvdrake;
use lib qw(/usr/lib/libDrakX);
@@ -43,7 +44,7 @@ sub scan4channels {
"argentina" => _("Argentina"),
-1 =>_("All")
);
-# HRC is Harmonically Related Carrier
+# HRC means Harmonically Related Carrier
$in->ask_from("TVdrake", _("Please,\ntype in your tv norm and country"),
[
@@ -54,8 +55,8 @@ sub scan4channels {
my $wait = $in->wait_message(_('Please wait'),
_("Scanning for TV channels in progress ..."));
-# france is a bogus table provided to scantv which will
-# ignore it as "All" is selected because of -a
+# we provide scantv a bogus table (france) which will
+# will be ignored as "All" is selected because of -a
$ftable_id = "france -a " if ($ftable_id eq -1);
# Note that this'll be broken if/when we implement interactive_qt
my $use_X =$in->isa('interactive_gtk') && -x "/usr/X11R6/bin/xvt";