aboutsummaryrefslogtreecommitdiffstats
path: root/lib
diff options
context:
space:
mode:
Diffstat (limited to 'lib')
-rw-r--r--lib/Fripost/Panel/Interface.pm2
-rw-r--r--lib/Fripost/Panel/Login.pm7
-rw-r--r--lib/Fripost/Schema/Local.pm1
3 files changed, 7 insertions, 3 deletions
diff --git a/lib/Fripost/Panel/Interface.pm b/lib/Fripost/Panel/Interface.pm
index 7b172af..db6752e 100644
--- a/lib/Fripost/Panel/Interface.pm
+++ b/lib/Fripost/Panel/Interface.pm
@@ -338,6 +338,8 @@ sub EditLocal : Runmode {
$template->param( newChanges => $news );
$template->param( error => encode_entities ($error, "‘‘") ) if $error;
$template->param( canDelete => 1 ) if $t eq 'alias'; # TODO
+ $template->param( listurl => $CFG{'listurl_'.$local{transport}}.$l.'@'.$d )
+ if $t eq 'list';
$q->delete('a');
return $template->output;
}
diff --git a/lib/Fripost/Panel/Login.pm b/lib/Fripost/Panel/Login.pm
index 1483e06..8132310 100644
--- a/lib/Fripost/Panel/Login.pm
+++ b/lib/Fripost/Panel/Login.pm
@@ -110,9 +110,10 @@ sub setup {
return 'ListDomains' unless (defined $null) and $null eq '';
unless (defined $domain and $domain ne '') {
- if (defined $a) {
- return 'AddDomain' if $a eq 'add';
- }
+ # TODO
+# if (defined $a) {
+# return 'AddDomain' if $a eq 'add';
+# }
return 'ListDomains';
}
diff --git a/lib/Fripost/Schema/Local.pm b/lib/Fripost/Schema/Local.pm
index 89c0a9a..bf92555 100644
--- a/lib/Fripost/Schema/Local.pm
+++ b/lib/Fripost/Schema/Local.pm
@@ -87,6 +87,7 @@ sub get {
elsif ($local->dn =~ /^fvl=/) {
$ret{type} = 'list';
$ret{list} = $local->get_value('fvl');
+ $ret{transport} = $local->get_value('fripostListManager');
}
$ret{isactive} = $local->get_value('fripostIsStatusActive') eq 'TRUE';
$ret{description} = concat($concat, $local->get_value('description'));