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"; - print "\n"; - print "\n"; - print "",&text('delete_rusure', "".&html_escape($name).""), + &ui_print_header(undef, $text{'delete_title'}."
".&html_escape($name)."", ""); + print "",&text('delete_rusure', "".&html_escape($name).""), "
\n"; print "\n"; - print "
\n"; - print "\n"; + local $bcss=' style="padding: 10px; text-align: center;"'; + print "
", + &ui_submit($text{'delete_ok'})."
\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 .= "
".&ui_submit($text{$submit})."
\n"; +} +print $otherbut; -print &ui_hr(); -print "\n"; -print "\n"; -print "\n"; -print "\n"; -print "\n"; -print "\n"; -print "
$text{'edit_deletemsg'}
\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 ""; +print "\n"; +print "
".$text{'info_title'}."
", + &ui_submit($text{'modify'}),"
\n
\n"; +print "\n"; +$desc = &find_value("description", $conf); +print "\n"; +print "\n"; +print "\n"; +print "\n"; +print "
".$text{'info_desc'}."$desc
",&text('info_info', $in{'name'}),""; + open(INFO, $list->{'info'}); + while() { + print if (!/^\[Last updated on:/); + } + close(INFO); +print "
".$text{'info_intro'}." \n"; + open(INTRO, $list->{'intro'}); + while() { + print if (!/^\[Last updated on:/); + } + close(INTRO); +print "
\n"; + +# header and footer +print "\n"; +print ""; +print "\n"; +print "
".$text{'head_title'}."
", + &ui_submit($text{'modify'}),"
\n
\n"; +print "\n"; +print "\n"; +print "\n"; +print "
".$text{'head_fronter'}." \n"; +print &find_value("message_fronter", $conf); +print "
".$text{'head_footer'}." \n"; +print &find_value("message_footer", $conf); +print "
".$text{'head_headers'}." \n"; +print &find_value("message_headers", $conf); +print "
\n"; + +# members +print "\n"; +print ""; +print "\n"; +print "
".$text{'members_title'}."
", + &ui_submit($text{'modify'}),"
\n
\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 "
", + &ui_submit($text{'edit_delete'})."
\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 "
".&ui_submit($text{'index_add'})."
\n"; + print "
".&ui_submit($text{'index_digest'})."
\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"; + print "

", + &ui_submit($text{'index_global'})."
\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