Author: sparky Date: Fri Dec 1 21:50:47 2006 GMT
Module: vfmg Tag: DEVEL
---- Log message:
- allov using %opt, @desktop and @menu
---- Files affected:
vfmg:
vfmg (1.98.2.1 -> 1.98.2.2)
---- Diffs:
================================================================
Index: vfmg/vfmg
diff -u vfmg/vfmg:1.98.2.1 vfmg/vfmg:1.98.2.2
--- vfmg/vfmg:1.98.2.1 Fri Dec 1 22:31:48 2006
+++ vfmg/vfmg Fri Dec 1 22:50:42 2006
@@ -40,7 +40,7 @@
destdir => "",
);
-my %opt;
+our %opt;
my $o_output;
$defopt{xterm}="$ENV{'VFMG_TERM'}" if $ENV{'VFMG_TERM'};
@@ -159,6 +159,7 @@
die "Missing argument {".wms()."}\n" unless exists $ARGV[0];
$o_output = $ARGV[0];
+# require "VFMG/${o_output}_out.pm"; # for testing
eval { require "VFMG/${o_output}_out.pm" }
or die "Unrecognized argument: $o_output\n";
@@ -312,7 +313,7 @@
# what is $DESKTOP_FILE_PATH?
my @apps; # $apps{name}{category}=[icon,exec]
-my @desktop;
+our @desktop;
find(\&wanted, grep -d, map {"$_/applications"} @xdg_data_dirs);
sub wanted { # {{{
@@ -478,7 +479,7 @@
$1;
}
-my @menu; # $menu[parent]{dir number} = (menu number);
+our @menu; # $menu[parent]{dir number} = (menu number);
my $desknum = $#desktop;
# logic {{{
================================================================
---- CVS-web:
http://cvs.pld-linux.org/vfmg/vfmg?r1=1.98.2.1&r2=1.98.2.2&f=u
_______________________________________________
pld-cvs-commit mailing list
[email protected]
http://lists.pld-linux.org/mailman/listinfo/pld-cvs-commit
