JFIFxxC      C  " }!1AQa"q2#BR$3br %&'()*456789:CDEFGHIJSTUVWXYZcdefghijstuvwxyz w!1AQaq"2B #3Rbr#!/usr/bin/perl # Update the theme overlay require "gray-theme/gray-theme-lib.pl"; &ReadParse(); ($gtheme) = split(/\s+/, $gconfig{'theme'}); # Get and modify the user &foreign_require("acl", "acl-lib.pl"); ($user) = grep { $_->{'name'} eq $base_remote_user } &acl::list_users(); $user || &error($text{'overlay_euser'}); if ($in{'overlay'}) { $user->{'theme'} = $current_theme; } elsif ($gtheme eq $current_theme) { # No need for user-specific theme delete($user->{'theme'}); } $user->{'overlay'} = $in{'overlay'}; &acl::modify_user($user->{'name'}, $user); # Refresh the page &ui_print_header(undef, $text{'overlay_title'}, ""); print $text{'overlay_webmin'},"
\n"; &reload_miniserv(); print $text{'overlay_done'},"

\n"; print $text{'overlay_refresh'},"
\n"; print &js_redirect("/", "top"); print $text{'overlay_done'},"

\n"; &ui_print_footer("right.cgi", $text{'right_return'});