Gallery: Allow specification of location when uploading ZIP archives (RFE 11502)

This commit is contained in:
kimd 2010-05-02 20:47:13 +02:00
parent 1c70821a6f
commit 95e9e52389
6 changed files with 66 additions and 12 deletions

View file

@ -988,6 +988,12 @@ sub www_addArchive {
name => "keywords",
value => ( $form->get("keywords") ),
});
$var->{ form_location }
= WebGUI::Form::Text( $session, {
name => "location",
value => ( $form->get("location") ),
});
$var->{ form_friendsOnly }
= WebGUI::Form::yesNo( $session, {
@ -1019,6 +1025,7 @@ sub www_addArchiveSave {
my $pb = WebGUI::ProgressBar->new($session);
my $properties = {
keywords => $form->get("keywords"),
location => $form->get("location"),
friendsOnly => $form->get("friendsOnly"),
};