Lines Matching refs:tag

70 	my $tag;
87 				if ($tag eq "description") {
91 				} elsif ($tag ne "") {
92 					parse_error($file, $ln, "tag '$tag' is invalid", $_);
104 				if ($tag =~ m/what/) {
114 				$tag = $new_tag;
120 			if ($tag ne "" && $new_tag) {
121 				$tag = $new_tag;
139 				if ($tag eq "description") {
146 						$data{$what}->{$tag} .= "$new_content\n";
149 					$data{$what}->{$tag} = $content;
156 		if (!$tag && $data{$nametag}->{what}) {
161 		if ($tag eq "description") {
167 					$data{$what}->{$tag} .= "$2\n";
172 					$data{$what}->{$tag} .= $content;
183 				$data{$what}->{$tag} .= $content;
188 			$data{$what}->{$tag} .= "\n$1";
189 			$data{$what}->{$tag} =~ s/\n+$//;