X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=httemplate%2Fpref%2Fpref.html;h=069f914ed646546334ca0d57a808b299693f37b1;hb=8591b5a157a2ee24c1467718eb0ce731a388f5c1;hp=229ac0e62d36c665e5f301202b05aac3c8cdceb7;hpb=7b3d074cbb694330334469510548d98eebe196ed;p=freeside.git

diff --git a/httemplate/pref/pref.html b/httemplate/pref/pref.html
index 229ac0e62..069f914ed 100644
--- a/httemplate/pref/pref.html
+++ b/httemplate/pref/pref.html
@@ -43,6 +43,20 @@ Interface
 <BR>
 
 
+Email Address
+<% ntable("#cccccc",2) %>
+
+  <TR>
+    <TH>Email Address(es) (comma separated) </TH>
+    <TD>
+   <TD><INPUT TYPE="text" NAME="email_address" VALUE="<% $email_address %>">
+    </TD>
+  </TR>
+
+</TABLE>
+<BR>
+
+
 Vonage integration (see <a href="https://secure.click2callu.com/">Click2Call</a>)
 <% ntable("#cccccc",2) %>
 
@@ -81,5 +95,8 @@ Vonage integration (see <a href="https://secure.click2callu.com/">Click2Call</a>
 ( $FS::CurrentUser::CurrentUser->option('menu_position') || 'left' )
   =~ /^(\w+)$/ or die "illegal menu_position";
 my $menu_position = $1;
+( $FS::CurrentUser::CurrentUser->option('email_address') )
+  =~ /^([,\w\@.]*)$/ or die "illegal email_address";  #too late
+my $email_address = $1;
 
 </%init>