Changeset 13167
- Timestamp:
- 2006-10-27T12:15:07+13:00 (17 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/gsdl/cgi-bin/gsdlCGI.pm
r12707 r13167 83 83 84 84 if ($xml) { 85 # Make $args XML safe 86 my $args_xml_safe = $args; 87 $args_xml_safe =~ s/&/&/g; 88 85 89 $full_mess = "<Error>\n"; 86 90 $full_mess .= " $mess\n"; 87 $full_mess .= " CGI args were: $args \n";91 $full_mess .= " CGI args were: $args_xml_safe\n"; 88 92 $full_mess .= "</Error>\n"; 89 93 } … … 109 113 110 114 if ($xml) { 115 # Make $args XML safe 116 my $args_xml_safe = $args; 117 $args_xml_safe =~ s/&/&/g; 118 111 119 $full_mess = "<Warning>\n"; 112 120 $full_mess .= " $mess\n"; 113 $full_mess .= " CGI args were: $args \n";121 $full_mess .= " CGI args were: $args_xml_safe\n"; 114 122 $full_mess .= "</Warning>\n"; 115 123 }
Note:
See TracChangeset
for help on using the changeset viewer.