Changeset 36297 for main

Timestamp:

2022-07-21T20:15:41+12:00 (21 months ago)

Author:

anupama

Message:

lomdemo-e's XMLRecord value does need the line feed (backslash-n) characters for nice display.

File:

• main/trunk/greenstone2/perllib/plugins/LOMPlugin.pm (modified) (3 diffs)

main/trunk/greenstone2/perllib/plugins/LOMPlugin.pm

@@ -104 +104 @@
     $self->{'extra_blocks'} = {};
 
-    $self->{'endline'} = ($ENV{'GSDL3SRCHOME'}) ? "" : "\n";    
+    $self->{'endline'} = ($ENV{'GSDL3SRCHOME'}) ? "" : "\n";
     
     return bless $self, $class;
@@ -325 +325 @@
     else {
     my $xml_depth = scalar(@{$self->{'metaname_stack'}});
-    $self->{'raw_text'} .= $self->{'endline'}; 
+    $self->{'raw_text'} .= "\n";
     $self->{'raw_text'} .= "  " x $xml_depth; 
     $self->{'raw_text'} .= $raw_tag;
@@ -395 +395 @@
 
     my $xml_depth = scalar(@{$self->{'metaname_stack'}});
-    $self->{'raw_text'} .= $self->{'endline'}; 
+    $self->{'raw_text'} .= "\n";
     $self->{'raw_text'} .= "  " x $xml_depth; 
     $self->{'raw_text'} .= $raw_tag;