summaryrefslogtreecommitdiff
path: root/lib/utf8_heavy.pl
diff options
context:
space:
mode:
Diffstat (limited to 'lib/utf8_heavy.pl')
-rw-r--r--lib/utf8_heavy.pl4
1 files changed, 2 insertions, 2 deletions
diff --git a/lib/utf8_heavy.pl b/lib/utf8_heavy.pl
index 4fbb112c23..21cd7d887c 100644
--- a/lib/utf8_heavy.pl
+++ b/lib/utf8_heavy.pl
@@ -52,7 +52,7 @@ sub SWASHNEW {
}
}
- unless (defined $file) {
+ unless ($list or defined $file) {
defined %utf8::In || do "unicore/In.pl";
$type = 'Lampersand' if $type =~ /^(?:Is)?L&$/;
$type = 'Assigned' if $type =~ /^(?:Is)?Assigned$/i;
@@ -88,7 +88,7 @@ sub SWASHNEW {
}
}
- unless (defined $file) {
+ unless ($list or defined $file) {
if ($type =~ /^To([A-Z][A-Za-z]+)$/) {
$file = "unicore/To/$1";
}