ezmlm-web/ezmlm-web
3
0
Fork 0
Code Issues Pull requests Projects Releases Wiki Activity

mailing list converstion implemented

Browse source
This commit is contained in:
lars 2006-04-11 10:33:55 +00:00
parent 8dcea30928
commit 9eb084e460
6 changed files with 33 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

9
ezmlm-web.cgi
View file

@ -219,6 +219,15 @@ elsif ($action eq '' || $action eq 'list_select') {
$error = 'ParameterMissing'; $error = 'ParameterMissing';
$pagename = 'list_select'; $pagename = 'list_select';
} }
} elsif ($action eq 'gnupg_convert') {
my $tlist = new Mail::Ezmlm::Gpg("$LIST_DIR/" . $q->param('list'));
if ($tlist->convert()) {
$pagename = 'subscribers';
$success = 'GnupgConvert';
} else {
$pagename = 'subscribers';
$warning = 'GnupgConvert';
}
} elsif (($action eq 'gnupg_ask') || ($action eq 'gnupg_do')) { } elsif (($action eq 'gnupg_ask') || ($action eq 'gnupg_do')) {
# User wants to manage keys (only for encrypted mailing lists) # User wants to manage keys (only for encrypted mailing lists)
my $subset = $q->param('gnupg_subset'); my $subset = $q->param('gnupg_subset');

3
lang/de.hdf
View file

@ -23,6 +23,7 @@ Lang {
GnupgPublicKeys = öffentliche Schlüssel GnupgPublicKeys = öffentliche Schlüssel
GnupgSecretKeys = private Schlüssel GnupgSecretKeys = private Schlüssel
GnupgGenerateKey = Schlüssel anlegen GnupgGenerateKey = Schlüssel anlegen
GnupgConvert = Verschlüsselung aktivieren
TextFiles = Texte TextFiles = Texte
ListSelect = Auswahl einer Liste ListSelect = Auswahl einer Liste
Properties = Eigenschaften von Properties = Eigenschaften von
@ -119,6 +120,7 @@ Lang {
GnupgInvalidExpiration = Das Verfallsdatum is ungültig! GnupgInvalidExpiration = Das Verfallsdatum is ungültig!
GnupgInvalidKeySize = Die Schlüssellänge ist ungültig! GnupgInvalidKeySize = Die Schlüssellänge ist ungültig!
GnupgExportKey = Fehler beim Exportieren des Schlüssels! GnupgExportKey = Fehler beim Exportieren des Schlüssels!
GnupgConvert = Beim umwandeln in eine verschlüsselte Mailingliste trat ein Fehler auf!
} }
@ -132,6 +134,7 @@ Lang {
SaveFile = Die Datei wurde gespeichert. SaveFile = Die Datei wurde gespeichert.
ResetFile = Der angepasste Textbaustein wurde entfernt. Zukünftig wird stattdessen der systemweite Standard-Baustein verwendet. ResetFile = Der angepasste Textbaustein wurde entfernt. Zukünftig wird stattdessen der systemweite Standard-Baustein verwendet.
GnupgKeyImport = Der Schlüssel wurde importiert. GnupgKeyImport = Der Schlüssel wurde importiert.
GnupgConvert = Verschlüsselung für die Mailingliste ist nun aktiv.
} }

3
lang/en.hdf
View file

@ -23,6 +23,7 @@ Lang {
GnupgPublicKeys = public keys GnupgPublicKeys = public keys
GnupgSecretKeys = secret keys GnupgSecretKeys = secret keys
GnupgGenerateKey = generate key GnupgGenerateKey = generate key
GnupgConvert = Enable encryption
TextFiles = Text files TextFiles = Text files
ListSelect = Choose a list ListSelect = Choose a list
Properties = Properties of Properties = Properties of
@ -119,6 +120,7 @@ Lang {
GnupgInvalidExpiration = The expiration time is invalid! GnupgInvalidExpiration = The expiration time is invalid!
GnupgInvalidKeySize = The length of the key is invalid! GnupgInvalidKeySize = The length of the key is invalid!
GnupgExportKey = Export of key failed! GnupgExportKey = Export of key failed!
GnupgConvert = Conversion to encrypted mailing list failed!
} }
@ -132,6 +134,7 @@ Lang {
SaveFile = The file was saved. SaveFile = The file was saved.
ResetFile = The customized text file was successfully removed. From now on, the system-wide default text file will be used instead of it. ResetFile = The customized text file was successfully removed. From now on, the system-wide default text file will be used instead of it.
GnupgKeyImport = The key was successfully imported. GnupgKeyImport = The key was successfully imported.
GnupgConvert = Encryption is now enabled for this list.
} }

11
template/config_options/gnupg_keyexpires.cs Normal file
View file

@ -0,0 +1,11 @@
<!-- expiration of the key (in years) -->
<label for="gnupg_keyexpires"><?cs var:html_escape(Lang.Misc.GnupgKeyExpires) ?>:</label>
<select name="gnupg_keyexpires" id="gnupg_keyexpires" size="0">
<option value="0"><?cs var:html_escape(Lang.Misc.Never) ?></option>
<option value="1y">1</option>
<option value="2y">2</option>
<option value="3y">3</option>
<option value="5y">5</option>
<option value="10y">10</option>
</select>

6
template/nav.cs
View file

@ -144,6 +144,12 @@
title="<?cs var:html_escape(Lang.Menue.TextFiles) ?>"><?cs title="<?cs var:html_escape(Lang.Menue.TextFiles) ?>"><?cs
var:html_escape(Lang.Menue.TextFiles) ?></a></li><?cs /if ?> var:html_escape(Lang.Menue.TextFiles) ?></a></li><?cs /if ?>
<?cs if:UI.Navigation.GnupgConvert == 1
?><li><a <?cs if:Data.Action == "gnupg_convert" ?> class="nav_active"<?cs /if ?>
href="<?cs call:link("list",Data.List.Name,"action","gnupg_convert","","") ?>"
title="<?cs var:html_escape(Lang.Menue.GnupgConvert) ?>"><?cs
var:html_escape(Lang.Menue.GnupgConvert) ?></a></li><?cs /if ?>
<?cs if:UI.Navigation.ListDelete == 1 <?cs if:UI.Navigation.ListDelete == 1
?><li><a <?cs if:(Data.Action == "list_delete") ?> class="nav_active"<?cs /if ?> ?><li><a <?cs if:(Data.Action == "list_delete") ?> class="nav_active"<?cs /if ?>
href="<?cs call:link("list",Data.List.Name,"action","list_delete_ask","","") ?>" href="<?cs call:link("list",Data.List.Name,"action","list_delete_ask","","") ?>"

1
template/ui/default/normal.hdf
View file

@ -23,6 +23,7 @@ UI {
TextEdit = 1 TextEdit = 1
ListDelete = 1 ListDelete = 1
GnupgConvert = 1
Help = 1 Help = 1
} }