diff options
| author | Andreas Brachold <vdr07@deltab.de> | 2008-11-24 16:39:09 +0000 |
|---|---|---|
| committer | Andreas Brachold <vdr07@deltab.de> | 2008-11-24 16:39:09 +0000 |
| commit | 8c42985fd234e2a993b3f01416941f4b371d1a92 (patch) | |
| tree | 917e47097785386fa27a0c29f6ab8f83a950b872 /bin | |
| parent | ffb81caa20a1dbede72f8a45299af87f8ab049e2 (diff) | |
| download | xxv-8c42985fd234e2a993b3f01416941f4b371d1a92.tar.gz xxv-8c42985fd234e2a993b3f01416941f4b371d1a92.tar.bz2 | |
* Add Data::COW (Copy on write handling for user own config profile)
* USER: Reimplement user own config profiles
* MEDIALIB: Remove fix number of columns, use now floating layout
* SVDRP: Add status message
* xxvd: Change password failed, on none HTML-Consoles
* AUTOTIMER: remove astatus (wrong callback)
* XMLTV: fix import, add multi recorder capability
* REPORT: clean up some routines
* STATUS: remove usage of /bin/wc, use native perl code
* CHANNELS: Fix hang at read channels, if recorder offline
* TELNET: remove 'quit' command do same like 'exit'
* RECORDS: clone database handle for preview image generation
* TIMERS: add more parameter check
* xxvd: disable mysql_enable_utf8
Diffstat (limited to 'bin')
| -rwxr-xr-x | bin/xxvd | 7 |
1 files changed, 6 insertions, 1 deletions
@@ -324,7 +324,7 @@ sub getDbh { my $dbh = DBI->connect($dsn, $usr, $pwd,{ PrintError => 1, AutoCommit => 1, - mysql_enable_utf8 => ($charset =~ m/UTF-8/ ? 1 : 0), +# mysql_enable_utf8 => (($charset =~ m/UTF-8/) ? 1 : 0), mysql_auto_reconnect => 1 }); @@ -452,6 +452,7 @@ sub quit { sub docu { # ------------------ my $console = shift; + my $config = shift; my $name = shift || 0; my $HTTPD = getModule("HTTPD"); @@ -491,6 +492,7 @@ sub docu { sub more { # ------------------ my $console = shift; + my $config = shift; my $name = shift || return error('No text file defined!'); my $param = shift || {}; @@ -692,6 +694,9 @@ sub module { required => gettext("This is required!"), check => sub{ my $value = shift || return; + + return $value unless(ref $value eq 'ARRAY'); + # If no password given the take the old password as default if($value->[0] and $value->[0] ne $value->[1]) { return undef, gettext("The fields with the 1st and the 2nd password must match!"); |
