vfmg (DEVEL): vfmg - Comment support in DR17 (and ASCII)

[sparky]

Author: sparky                       Date: Thu Jan  5 17:46:36 2006 GMT
Module: vfmg                          Tag: DEVEL
---- Log message:
- Comment support in DR17 (and ASCII)

---- Files affected:
vfmg:
   vfmg (1.73.2.53 -> 1.73.2.54) 

---- Diffs:

================================================================
Index: vfmg/vfmg
diff -u vfmg/vfmg:1.73.2.53 vfmg/vfmg:1.73.2.54
--- vfmg/vfmg:1.73.2.53	Thu Jan  5 18:36:58 2006
+++ vfmg/vfmg	Thu Jan  5 18:46:31 2006
@@ -338,6 +338,7 @@
 			/^\s*
 			(Name(?:\[(?:$langs)\])?
 			 |GenericName(?:\[(?:$langs)\])?
+			 |Comment(?:\[(?:$langs)\])?
 			 |Icon|Exec|Categories|Terminal|Type|Encoding|NoDisplay
 			 |OnlyShowIn)
 			\s* = \s* (.+?)
@@ -397,7 +398,7 @@
 	$tags{Encoding} = exists $tags{Encoding} ? $tags{Encoding} : 'iso-8859-1';
 	
 	my @to_decode = qw(Name);
-	push @to_decode, "GenericName"
+	push @to_decode, qw(GenericName Comment)
 		if $o_output eq "DR17" or $o_output eq "ASCII";
 	foreach my $tag_name (@to_decode) {
 		my @all = (grep /^$tag_name/, keys %tags);
@@ -883,6 +884,7 @@
 				print "$level \033[${cnum}m\033(0tq\033(B\033[${cnext}m\033[1m[$$d{Name}]";
 			}
 			print " ($$d{GenericName})" if $$d{GenericName};
+			print " [$$d{Comment}]" if $$d{Comment};
 			print "\033[0m\n";
 			ASCII($menu[$no]{$entry},$level.$step, $cnext);
 		}
@@ -895,6 +897,7 @@
 			print "$level \033[${cnum}m\033(0\017tq\033(B\033[${cnext}m$$d{Name}";
 		}
 		print " ($$d{GenericName})" if $$d{GenericName};
+		print " [$$d{Comment}]" if $$d{Comment};
 		print "\033[0m\n";
 		$num++;
 	}
@@ -932,6 +935,8 @@
 			push @eapp, "-set-name",$name;
 			push @eapp, "-set-generic",$$d{GenericName}
 				if $$d{GenericName};
+			push @eapp, "-set-comment",$$d{Comment}
+				if $$d{Comment};
 			push @eapp, "-set-exe",$$d{Exec};
 			if ( defined $$dr{wcnt} ) {
 				if ( exists $$dr{wcnt}{$$d{file}} ) {
================================================================

---- CVS-web:
    http://cvs.pld-linux.org/vfmg/vfmg?r1=1.73.2.53&r2=1.73.2.54&f=u