urosm
/
ikiwiki
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

more fixes to subscription prefs

master
Joey Hess 2012-03-28 20:56:22 -04:00
parent d366a7bbb5
commit 5ed773c643
1 changed files with 7 additions and 13 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

18
IkiWiki/Plugin/notifyemail.pm
View File

@ -6,7 +6,6 @@ use strict;
use IkiWiki 3.00;
sub import {
hook(type => "formbuilder_setup", id => "notifyemail", call => \&formbuilder_setup);
hook(type => "formbuilder", id => "notifyemail", call => \&formbuilder);
hook(type => "getsetup", id => "notifyemail", call => \&getsetup);
hook(type => "changes", id => "notifyemail", call => \&notify);
@ -20,28 +19,23 @@ sub getsetup () {
},
}
sub formbuilder_setup (@) {
sub formbuilder (@) {
my %params=@_;
my $form=$params{form};
return unless $form->title eq "preferences";
my $session=$params{session};
my $username=$session->param("name");
$form->field(name => "subscriptions", size => 50,
fieldset => "preferences",
comment => "(".htmllink("", "", "ikiwiki/PageSpec", noimageinline => 1).")");
if (! $form->submitted) {
$form->field(name => "subscriptions", force => 1,
value => getsubscriptions($session->param("name")));
value => getsubscriptions($username));
}
elsif ($form->submitted eq "Save Preferences" && $form->validate &&
defined $form->field("subscriptions")) {
setsubscriptions($username, $form->field('subscriptions'));
}
sub formbuilder (@) {
my %params=@_;
my $form=$params{form};
return unless $form->title eq "preferences" &&
$form->submitted eq "Save Preferences" && $form->validate &&
defined $form->field("subscriptions");
setsubscriptions($form->field('name'), $form->field('subscriptions'));
}
sub getsubscriptions ($) {