diff options
| author | Ruslan Ermilov <ru@FreeBSD.org> | 2001-02-23 09:40:42 +0000 |
|---|---|---|
| committer | Ruslan Ermilov <ru@FreeBSD.org> | 2001-02-23 09:40:42 +0000 |
| commit | 96fab1bece63a20baca3fd5742728c55fccab061 (patch) | |
| tree | e078be82c849317db295d7d021878a739f3794e8 | |
| parent | 03bacd0e38bdb5231c20543083ffed81d3d4d7ab (diff) | |
Notes
| -rw-r--r-- | gnu/usr.bin/man/catman/catman.perl | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/gnu/usr.bin/man/catman/catman.perl b/gnu/usr.bin/man/catman/catman.perl index 4974987b2362..3eeafed523f8 100644 --- a/gnu/usr.bin/man/catman/catman.perl +++ b/gnu/usr.bin/man/catman/catman.perl @@ -420,6 +420,8 @@ sub short_locale_name { $lname =~ s|_[A-Z][A-Z]||; warn "short locale name is $lname\n" if $verbose && $locale; + + return $lname; } ############# |
