From 837123de93a52b9f63fadf26aeab02ea6b31dd64 Mon Sep 17 00:00:00 2001
From: Martin Kamerbeek <martin@martintwee.oqapi.nl>
Date: Thu, 4 Nov 2010 14:27:52 +0100
Subject: [PATCH] Internationalize MailingSubscribe reg plugin

---
 lib/WebGUI/Registration/Step/MailingSubscribe.pm  | 10 ++++------
 .../Dutch/RegistrationStep_MailingSubscribe.pm    | 15 +++++++++++++++
 .../English/RegistrationStep_MailingSubscribe.pm  | 15 +++++++++++++++
 3 files changed, 34 insertions(+), 6 deletions(-)
 create mode 100644 lib/WebGUI/i18n/Dutch/RegistrationStep_MailingSubscribe.pm
 create mode 100644 lib/WebGUI/i18n/English/RegistrationStep_MailingSubscribe.pm

diff --git a/lib/WebGUI/Registration/Step/MailingSubscribe.pm b/lib/WebGUI/Registration/Step/MailingSubscribe.pm
index a3ebdf2..deff855 100644
--- a/lib/WebGUI/Registration/Step/MailingSubscribe.pm
+++ b/lib/WebGUI/Registration/Step/MailingSubscribe.pm
@@ -71,6 +71,7 @@ sub getSummaryTemplateVars {
     my $self                    = shift;
     my $includeAdminControls    = shift;
     my $session                 = $self->session;
+    my $i18n                    = WebGUI::International->new( $session, 'RegistrationStep_MailingSubscribe' );
     my @fields;
 
     # Fetch preferred homepage url
@@ -82,12 +83,8 @@ sub getSummaryTemplateVars {
                 @{ $mailings };
 
     push @fields, {
-        field_label         => 'Subscribe to mailings',
+        field_label         => $i18n->get( 'Subscribe to mailings' ),
         field_value         => join( ', ', map { $_->getTitle } @assets ),
-#        field_formElement   => WebGUI::Form::text( $session,  {
-#            name    => 'preferredHomepageUrl', 
-#            value   => $preferredHomepageUrl,
-#        }),
     };
 
     # Setup tmpl_var
@@ -106,6 +103,7 @@ sub getViewVars {
     my $session = $self->session;
     my $form    = $session->form;
     my $user    = $self->registration->instance->user;
+    my $i18n    = WebGUI::International->new( $session, 'RegistrationStep_MailingSubscribe' );
 
     my $availableMailings = $self->getAvailableMailings;
 
@@ -141,7 +139,7 @@ sub getViewVars {
                         name    => 'subscribeMailings',
                         value   => $id,
                         checked => $isSubscribed{ $id },
-                        label   => 'Subscribe to this mailing',
+                        label   => $i18n->get( 'Subscribe to this mailing' ),
                     }),
             }
         );
diff --git a/lib/WebGUI/i18n/Dutch/RegistrationStep_MailingSubscribe.pm b/lib/WebGUI/i18n/Dutch/RegistrationStep_MailingSubscribe.pm
new file mode 100644
index 0000000..957d7f1
--- /dev/null
+++ b/lib/WebGUI/i18n/Dutch/RegistrationStep_MailingSubscribe.pm
@@ -0,0 +1,15 @@
+package WebGUI::i18n::Dutch::RegistrationStep_MailingSubscribe;
+
+use strict;
+
+our $I18N = {
+    'Subscribe to mailings' => {
+        message => 'Abonneren op nieuwsbrieven',
+    },
+    'Subscribe to this mailing' => {
+        message => 'Abonneer op deze nieuwsbrief',
+    },
+};
+
+1;
+
diff --git a/lib/WebGUI/i18n/English/RegistrationStep_MailingSubscribe.pm b/lib/WebGUI/i18n/English/RegistrationStep_MailingSubscribe.pm
new file mode 100644
index 0000000..9b6df53
--- /dev/null
+++ b/lib/WebGUI/i18n/English/RegistrationStep_MailingSubscribe.pm
@@ -0,0 +1,15 @@
+package WebGUI::i18n::English::RegistrationStep_MailingSubscribe;
+
+use strict;
+
+our $I18N = {
+    'Subscribe to mailings' => {
+        message => 'Subscribe to mailings',
+    },
+    'Subscribe to this mailing' => {
+        message => 'Subscribe to this mailing',
+    },
+};
+
+1;
+