X-Git-Url: https://ruin.nu/git/?a=blobdiff_plain;ds=sidebyside;f=ND%2FWeb%2FPages%2FSettings.pm;h=0d0e6f6d3aff1b4c6f0cdc1325d69c44f9ea630c;hb=4eabb0ceacd31e3df7bd4e10bc4509f7f20c80b5;hp=e7f22311631d27968d0c0834c637f20723563592;hpb=571b019af4b9e3e051447f82135bb630a4fb4db8;p=ndwebbie.git diff --git a/ND/Web/Pages/Settings.pm b/ND/Web/Pages/Settings.pm index e7f2231..0d0e6f6 100644 --- a/ND/Web/Pages/Settings.pm +++ b/ND/Web/Pages/Settings.pm @@ -36,12 +36,12 @@ sub render_body { if (defined param 'cmd'){ if(param('cmd') eq 'stylesheet'){ - my $query = $DBH->prepare(q{UPDATE users SET css = NULLIF($2,'') WHERE uid = $1}); + my $query = $DBH->prepare(q{UPDATE users SET css = NULLIF($2,'Default') WHERE uid = $1}); $query->execute($ND::UID,escapeHTML(param 'stylesheet')) or $ND::ERROR .= p $DBH->errstr; } } my ($css) = $DBH->selectrow_array(q{SELECT css FROM users WHERE uid = $1},undef,$ND::UID); - my @stylesheets = ({Style => ''}); + my @stylesheets = ({Style => 'Default'}); $css = '' unless defined $css; while (){ if(m{stylesheets/(\w+)\.css}){