LEAVE is reserved in msyql
authorivan <ivan>
Tue, 17 Aug 2010 06:43:07 +0000 (06:43 +0000)
committerivan <ivan>
Tue, 17 Aug 2010 06:43:07 +0000 (06:43 +0000)
FS/FS/Schema.pm
FS/FS/acct_snarf.pm
httemplate/edit/acct_snarf.html

index 8772a3d..dfd7a87 100644 (file)
@@ -2012,7 +2012,7 @@ sub tables_hashref {
         'username',   'varchar',     '', $char_d, '', '', 
         '_password',  'varchar',     '', $char_d, '', '', 
         'check_freq',     'int', 'NULL',      '', '', '', 
-        'leave',         'char', 'NULL',       1, '', '', 
+        'leavemail',     'char', 'NULL',       1, '', '', 
         'apop',          'char', 'NULL',       1, '', '', 
         'tls',           'char', 'NULL',       1, '', '', 
         'mailbox',    'varchar', 'NULL', $char_d, '', '', 
index 480a632..9816de9 100644 (file)
@@ -142,7 +142,7 @@ sub check {
     || $self->ut_alphan('protocol')
     || $self->ut_textn('username')
     || $self->ut_numbern('check_freq')
-    || $self->ut_enum('leave', [ '', 'Y' ])
+    || $self->ut_enum('leavemail', [ '', 'Y' ])
     || $self->ut_enum('apop', [ '', 'Y' ])
     || $self->ut_enum('tls', [ '', 'Y' ])
     || $self->ut_alphan('mailbox')
@@ -195,9 +195,9 @@ sub cgp_hashref {
     'domain'   => $self->machine,
     'password' => $self->_password,
     'period'   => $self->check_freq.'s',
-    'APOP'     => ( $self->apop  eq 'Y' ? 'YES' : 'NO' ),
-    'TLS'      => ( $self->tls   eq 'Y' ? 'YES' : 'NO' ),
-    'Leave'    => ( $self->leave eq 'Y' ? 'YES' : 'NO' ), #XXX leave??
+    'APOP'     => ( $self->apop      eq 'Y' ? 'YES' : 'NO' ),
+    'TLS'      => ( $self->tls       eq 'Y' ? 'YES' : 'NO' ),
+    'Leave'    => ( $self->leavemail eq 'Y' ? 'YES' : 'NO' ), #XXX leave??
   };
 }
 
index 5fd3f83..1c815b2 100644 (file)
@@ -9,7 +9,7 @@
                            'username'         => 'Username',
                            '_password'        => 'Password',
                            'check_freq'       => 'Poll every',
-                           'leave'            => 'Leave',
+                           'leavemail'        => 'Leave',
                            'apop'             => 'Use APOP',
                            'tls'              => 'TLS',
                            'mailbox'          => 'Mailbox',
@@ -26,9 +26,9 @@
                              'options'   => [ keys %$cf_labels ],
                              'labels'    => $cf_labels,
                            },
-                           { field=>'leave', type=>'checkbox', value=>'Y', },
-                           { field=>'apop',  type=>'checkbox', value=>'Y', },
-                           { field=>'tls',   type=>'checkbox', value=>'Y', },
+                           { field=>'leavemail', type=>'checkbox', value=>'Y' },
+                           { field=>'apop',      type=>'checkbox', value=>'Y' },
+                           { field=>'tls',       type=>'checkbox', value=>'Y' },
                            'mailbox',
                          ],
              'new_callback' => sub { my( $cgi, $acct_snarf ) = @_;