diff --git a/lang/de b/lang/de
index 7673c2937..37d73be07 100644
--- a/lang/de
+++ b/lang/de
@@ -169,7 +169,7 @@ main_title2=Webmin
main_title3=Webmin $1 ($2)
main_unused=Nicht benutzte Module
main_version=Version $1 auf $2 ($3)
-modify=Modifizieren
+modify=Anpassen
modules_all=Alle Module
modules_cancel=Abbrechen
modules_clear=Löschen
diff --git a/majordomo/delete_list.cgi b/majordomo/delete_list.cgi
index 34988f0ac..e494b9a45 100755
--- a/majordomo/delete_list.cgi
+++ b/majordomo/delete_list.cgi
@@ -84,11 +84,8 @@ if ($in{'confirm'}) {
}
else {
# ask the user if he is sure
- &ui_print_header(undef, $text{'delete_title'}, "");
- print "
\n";
+ local $bcss=' style="padding: 10px; text-align: center;"';
+ print "\n";
&ui_print_footer("edit_list.cgi?name=$name", $text{'edit_return'});
}
diff --git a/majordomo/edit_list.cgi b/majordomo/edit_list.cgi
index 6e33943e1..f2dd6511d 100755
--- a/majordomo/edit_list.cgi
+++ b/majordomo/edit_list.cgi
@@ -7,11 +7,14 @@ require './majordomo-lib.pl';
%access = &get_module_acl();
&can_edit_list(\%access, $in{'name'}) ||
&error($text{'edit_ecannot'});
-$desc = &text('edit_for', "".&html_escape($in{'name'})."");
-&ui_print_header($desc, $text{'edit_title'}, "");
+$list = &get_list($in{'name'}, &get_config());
+$conf = &get_list_config($list->{'config'});
+local $moderate= (&find_value('moderate', $conf) =~ /no/) ? "" : " (".$text{'index_moderated'}.")";
-@links = ( "edit_members.cgi", "edit_info.cgi", "edit_subs.cgi",
- "edit_mesg.cgi", "edit_access.cgi", "edit_head.cgi",
+&ui_print_header(undef, $text{'edit_title'}."
".&html_escape($in{'name'})."$moderate", "");
+
+@links = ( "edit_subs.cgi",
+ "edit_mesg.cgi", "edit_access.cgi",
"edit_misc.cgi" );
foreach $a (&foreign_call($aliases_module, "list_aliases",
&get_aliases_file())) {
@@ -23,19 +26,89 @@ foreach $a (&foreign_call($aliases_module, "list_aliases",
if ($isdigest) {
push(@links, "edit_digest.cgi");
}
-map { s/edit_(\S+).cgi/images\/$1.gif/ } (@icons = @links);
-map { s/edit_(\S+).cgi/$text{"$1_title"}/ } (@titles = @links);
-@links = map { $_."?name=".&urlize($in{'name'}) } @links;
-&icons_table(\@links, \@titles, \@icons);
+# name to add to links
+$name_link="?name=".&urlize($in{'name'});
+# other buttons
+local $otherbut, $bcss=' style="display: box; float: left; padding: 10px;"';
+foreach (@links)
+{
+ $action = $_ .$name_link, ($submit=$_) =~ s/edit_(\S+).cgi/$1_title/;
+ $otherbut .= "\n";
+}
+print $otherbut;
-print &ui_hr();
-print "\n";
-print "\n";
-print "
\n";
+# css for table
+local $tcss='style="width: 98%; margin: 1% !important;"';
+local $dcss='style="text-align: right; vertical-align: top; padding: 5px !important; min_heigth: 5em;"';
+local $vcss='style="width: 40%; border: 1px solid lightgrey; padding: 5px !important;"';
+
+# title, descritpion, info
+print "\n";
+print " | ".$text{'info_title'}." | ";
+print "\n |
\n";
+print " \n";
+print " | ".$text{'info_desc'}." | \n";
+$desc = &find_value("description", $conf);
+print "$desc | \n";
+print " | ",&text('info_info', $in{'name'})," | \n";
+print "";
+ open(INFO, $list->{'info'});
+ while() {
+ print if (!/^\[Last updated on:/);
+ }
+ close(INFO);
+print " | \n";
+print " | ".$text{'info_intro'}." | \n";
+ open(INTRO, $list->{'intro'});
+ while() {
+ print if (!/^\[Last updated on:/);
+ }
+ close(INTRO);
+print " | \n";
+print " |
\n";
+
+# header and footer
+print "\n";
+print " | ".$text{'head_title'}." | ";
+print "\n |
\n";
+print " \n";
+print " | ".$text{'head_fronter'}." | \n";
+print &find_value("message_fronter", $conf);
+print " | \n";
+print " | ".$text{'head_footer'}." | \n";
+print &find_value("message_footer", $conf);
+print " | \n";
+print " | ".$text{'head_headers'}." | \n";
+print &find_value("message_headers", $conf);
+print " | \n";
+print " |
\n";
+
+# members
+print "\n";
+print " | ".$text{'members_title'}." | ";
+print "\n |
\n";
+print " | \n";
+local @cols, @tds, $count=0;
+print &ui_columns_start(\@cols, $tcss, 0, \@tds);
+ open(MEMS, $list->{'members'});
+ while() {
+ $count++;
+ push(@cols, $_);
+ if($count % 3 == 0) {print &ui_columns_row(\@cols, \@tds); @cols=();}
+ }
+ close(MEMS);
+push(@cols,"","") if $count % 3 == 1;
+push(@cols, "") if $count % 3 == 2;
+print &ui_columns_row(\@cols, \@tds);
+print " |
\n";
+
+#delete list
+print "\n";
+print "$text{'edit_deletemsg'}
\n";
&ui_print_footer("", $text{'index_return'});
diff --git a/majordomo/index.cgi b/majordomo/index.cgi
index b830fa45c..321136fc4 100755
--- a/majordomo/index.cgi
+++ b/majordomo/index.cgi
@@ -1,4 +1,4 @@
-#!/usr/bin/perl
+#!/usr/local/bin/perl
# index.cgi
# Display all mailing lists and majordomo options
@@ -113,17 +113,19 @@ if (!$majordomo_alias) {
@lists = sort { $a cmp $b } @lists if ($config{'sort_mode'});
map { $lcan{$_}++ } split(/\s+/, $access{'lists'});
# top links
+local $otherbut, $bcss=' style="display: box; float: left; padding: 10px;"';
if ($access{'create'}) {
- @crlinks = ( &ui_link("create_form.cgi",$text{'index_add'}) );
- push(@crlinks, &ui_link("digest_form.cgi",$text{'index_digest'}));
+ print "\n";
+ print "\n";
+ print ""
}
if (@lists) {
# table header
local @hcols, @tds;
push(@hcols, "", "");
- push(@hcols, $text{'index_name'}, $text{'index_info'}, $text{'index_owner'}, $text{'index_moderated'}, $text{'index_count'});
- push(@tds, "width=5" ,"" );
- push(@tds, "width=200", "", "width=200", "", "");
+ push(@hcols, $text{'index_name'}, $text{'index_info'}, $text{'index_mail'}, $text{'index_moderated'}, $text{'index_count'});
+ push(@tds, "width=5" ,"width=100" );
+ push(@tds, "", "", "width=100", "", "");
print &ui_columns_start(\@hcols, 100, 0, \@tds);
# mailing lists
foreach $l (grep { $lcan{$_} || $lcan{"*"} } @lists) {
@@ -133,30 +135,31 @@ if (@lists) {
push(@cols, "","
");
push(@cols, "". &html_escape($l) ."" );
open(INFO, $list->{'info'});
- push(@cols, "".."" ." [edit]");
+ push(@cols, "".."" ." edit");
close(INFO);
#push(@cols, $l . "-owner");
push(@cols, "". &find_value('reply_to', $conf) ."");
- push(@cols, "". $text{&find_value('moderate', $conf)} ."");
- push(@cols, `cat $list->{'members'} | wc -l` . " [edit]");
+ push(@cols, "". $text{&find_value('moderate', $conf)} ."");
+ push(@cols, "".`cat $list->{'members'} | wc -l` . " edit");
print&ui_columns_row(\@cols, \@tds);
}
} else {
print "$text{'index_none'}.\n";
}
-if ($access{'create'}) {
- print &ui_links_row(\@crlinks);
- }
-
if ($access{'global'}) {
- print &ui_hr();
- print "
\n";
- print "
\n";
- print "
\n";
+ print "\n";
+ print "$text{'index_globaldesc'}
\n";
}
&ui_print_footer("/", $text{'index'});
+print "",
+ "";
diff --git a/majordomo/lang/de b/majordomo/lang/de
index 8156f13d2..3ee94bdb3 100644
--- a/majordomo/lang/de
+++ b/majordomo/lang/de
@@ -218,3 +218,8 @@ access_adv0=Jedermann
create_archive=Mailingliste archivieren?
index_globaldesc=Bearbeiten der globalen Majordomo-Einstellungen, die auf alle Mailinglisten angewandt werden
delete_title=Lösche die Liste
+index_name=Name Mailingliste
+index_info=Kurzbescheibung
+index_mail=Mail Adresse
+index_moderated=Modieriert
+index_count=# Teilnehmer
diff --git a/majordomo/lang/de.UTF-8 b/majordomo/lang/de.UTF-8
index 29f14d6a2..1b5f9fe90 100644
--- a/majordomo/lang/de.UTF-8
+++ b/majordomo/lang/de.UTF-8
@@ -218,6 +218,9 @@ access_adv0=Jedermann
create_archive=Mailingliste archivieren?
index_globaldesc=Bearbeiten der globalen Majordomo-Einstellungen, die auf alle Mailinglisten angewandt werden
delete_title=Lösche die Liste
-index_name=Name der Mailingliste
+index_name=Name Mailingliste
index_info=Kurzbescheibung
-index_count=# der Teilnehmer
\ No newline at end of file
+index_mail=Mail Adresse
+index_moderated=Modieriert
+index_count=# Teilnehmer
+list_title=Übersicht Mailingliste
diff --git a/majordomo/lang/en b/majordomo/lang/en
index 3c960362b..90e9838b4 100644
--- a/majordomo/lang/en
+++ b/majordomo/lang/en
@@ -18,8 +18,10 @@ index_global=Edit Majordomo Options
index_globaldesc=Edit global Majordomo options that apply to all mailing lists
index_return=mailing lists
index_version=Majordomo version $1
-index_name=Name of list
+index_name=List name
index_info=List info
+index_mail=Mail adress
+index_moderated=Moderated
index_count=# of users
global_title=Global Options