Lines Matching full:contents

280 my $contents = "";
457 # dumps section contents to arrays/hashes intended for that purpose.
462     my $contents = join "\n", @_;
466 	$parameterdescs{$name} = $contents;
472 	$parameterdescs{$name} = $contents;
482 	    $sections{$name} .= $contents;
484 	    $sections{$name} = $contents;
498     my $contents = join "\n", @_;
510 	dump_section($file, $name, $contents);
530     my $contents = join "\n",@_;
534 #   if (!defined $contents) {
539 #   print STDERR "contents b4:$contents\n";
542 #   print STDERR "contents af:$contents\n";
544     foreach $line (split "\n", $contents) {
750     # The dohighlight kludge requires the text be called $contents
751     my $contents = shift;
754     return $contents;
2038 	$contents = "";
2076 	$contents = "";
2122 	dump_section($file, $section, $contents);
2125 	$contents = "";
2145 	if (($contents ne "") && ($contents ne "\n")) {
2147 		emit_warning("${file}:$.", "contents before sections\n");
2149 	    dump_section($file, $section, $contents);
2155 	$contents = $newcontents;
2157 	while (substr($contents, 0, 1) eq " ") {
2158 	    $contents = substr($contents, 1);
2160 	if ($contents ne "") {
2161 	    $contents .= "\n";
2166 	if (($contents ne "") && ($contents ne "\n")) {
2167 	    dump_section($file, $section, $contents);
2169 	    $contents = "";
2183 		dump_section($file, $section, $contents);
2185 		$contents = "";
2194 		$contents .= "\n";
2213 	    $contents .= $cont . "\n";
2230 	$contents = $2;
2231 	if ($contents ne "") {
2232 	    $contents .= "\n";
2233 	    dump_section($file, $section, $contents);
2235 	    $contents = "";
2254 	dump_doc_section($file, $section, $contents);
2256 	$contents = "";
2267 	    $contents .= $blankline;
2269 	    $contents .= $1 . "\n";
2283 	$contents = $2;
2285 	if ($contents ne "") {
2286 	    while (substr($contents, 0, 1) eq " ") {
2287 		$contents = substr($contents, 1);
2289 	    $contents .= "\n";
2294 	if (($contents ne "") && ($contents ne "\n")) {
2295 	    dump_section($file, $section, $contents);
2297 	    $contents = "";
2304 	    $contents .= $1 . "\n";
2306 	    if ($contents =~ /^\s*$/) {
2307 		$contents = "";
2383     $dohighlight .=  "\$contents =~ s:$pattern:$result:gs;\n";