diff options
| author | Guilhem Moulin <guilhem.moulin@fripost.org> | 2012-09-24 21:48:09 +0200 |
|---|---|---|
| committer | Guilhem Moulin <guilhem.moulin@fripost.org> | 2012-09-24 21:48:09 +0200 |
| commit | 33364b4a63d9082eed3a956f7a1567f343839999 (patch) | |
| tree | 0d092a8249922c276f26397ad6564ceeff240c0c | |
| parent | aaca3cc7cb413af1f566ac8d7a601d3c142e89f0 (diff) | |
wibble
| -rw-r--r-- | lib/Fripost/Panel/Interface.pm | 2 | ||||
| -rw-r--r-- | lib/Fripost/Panel/Login.pm | 7 | ||||
| -rw-r--r-- | lib/Fripost/Schema/Local.pm | 1 | ||||
| -rw-r--r-- | template/edit-list.html | 5 |
4 files changed, 10 insertions, 5 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')); diff --git a/template/edit-list.html b/template/edit-list.html index 25d7af5..f44e38c 100644 --- a/template/edit-list.html +++ b/template/edit-list.html @@ -22,8 +22,9 @@ <hr/> <div id="content"> - <h1>Edit list <span class="email"><TMPL_VAR NAME=list>@<TMPL_VAR NAME=domain></span></h1> - + <h1>Edit list <a class="external" target="_blank" href="<TMPL_VAR NAME=listurl>" + ><span class="email"><TMPL_VAR NAME=list>@<TMPL_VAR NAME=domain></span + ></a></h1> <TMPL_IF NAME=newChanges> <TMPL_IF NAME=error> |