From 9c2dce75b3bf6b222de4257c1ef59c6d407ba3b1 Mon Sep 17 00:00:00 2001
From: levinse <levinse>
Date: Tue, 14 Jun 2011 18:53:40 +0000
Subject: [PATCH 1/1] Msgcat.pm: return untranslated strings properly when no
 translation is found

---
 FS/FS/Msgcat.pm | 3 +++
 1 file changed, 3 insertions(+)

diff --git a/FS/FS/Msgcat.pm b/FS/FS/Msgcat.pm
index 242980515..2406e8db0 100644
--- a/FS/FS/Msgcat.pm
+++ b/FS/FS/Msgcat.pm
@@ -58,6 +58,8 @@ our %cache;
 
 sub _gettext {
   my $msgcode = shift;
+  return '' unless defined($msgcode) && length($msgcode) > 0;
+
   my $locale =  (@_ && shift)
              || $FS::CurrentUser::CurrentUser->option('locale')
              || $def_locale;
@@ -85,6 +87,7 @@ sub _gettext {
                                        });
         warn "WARNING: auto-inserting message for msgcode $msgcode in locale $locale";
         $newmsgcat->insert;
+        return $msgcode; # or maybe this should be below the next bracket?
     }
   }
 
-- 
2.11.0