projects
/
migration-tools.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
(parent:
17f4a9e
)
silence un-init string warning
author
Jason Etheridge
<jason@esilibrary.com>
Thu, 9 Oct 2008 17:56:42 +0000 (17:56 +0000)
committer
Jason Etheridge
<jason@esilibrary.com>
Thu, 9 Oct 2008 17:56:42 +0000 (17:56 +0000)
unicorn_patron_xml2text.pl
patch
|
blob
|
history
diff --git
a/unicorn_patron_xml2text.pl
b/unicorn_patron_xml2text.pl
index
eeb21c7
..
bd28c12
100755
(executable)
--- a/
unicorn_patron_xml2text.pl
+++ b/
unicorn_patron_xml2text.pl
@@
-108,7
+108,7
@@
for my $patron ( $doc->documentElement->childNodes ) {
foreach my $e ( @addr_elements ) {
my $v;
if ($e eq "known_bad") {
- $v = $addresses{$t}->getAttribute( $e ); $v =~ s/^\s+//; $v =~ s/\s+$//;
+ $v = $addresses{$t}->getAttribute( $e ); if ($v) { $v =~ s/^\s+//; $v =~ s/\s+$//; }
} else {
$v = $addresses{$t}->findvalue( $e ); $v =~ s/^\s+//; $v =~ s/\s+$//;
}