1 files changed, 1 insertions, 1 deletions
diff --git a/bin/am.pl b/bin/am.pl
index 68a2827c..9a908e28 100755
--- a/bin/am.pl
+++ b/bin/am.pl
@@ -2044,7 +2044,7 @@ sub config {
   for (qw(name company address signature)) { $myconfig{$_} = $form->quote($myconfig{$_}) }
   for (qw(address signature)) { $myconfig{$_} =~ s/\\n/\n/g }
 
-  %countrycodes = User->country_codes;
+  %countrycodes = LedgerSMB::User->country_codes;
   $countrycodes = '';
   
   foreach $key (sort { $countrycodes{$a} cmp $countrycodes{$b} } keys %countrycodes) {