Index: openacs-4/packages/acs-subsite/catalog/acs-subsite.en_US.ISO-8859-1.xml =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/catalog/acs-subsite.en_US.ISO-8859-1.xml,v diff -u -r1.42 -r1.43 --- openacs-4/packages/acs-subsite/catalog/acs-subsite.en_US.ISO-8859-1.xml 17 Oct 2003 10:30:23 -0000 1.42 +++ openacs-4/packages/acs-subsite/catalog/acs-subsite.en_US.ISO-8859-1.xml 17 Oct 2003 17:51:07 -0000 1.43 @@ -33,6 +33,7 @@ Applications Approve at + Authority Bad Password Ban Basic Information @@ -120,7 +121,6 @@ go upload the user's portrait go upload your portrait Grant - Grant: Grant Permission Hide Home page @@ -144,6 +144,7 @@ log in Log in to %system_name% logging back in + The login page has expired. Please log in again. Login or register login page Logout @@ -245,6 +246,7 @@ This package does not have any parameters. your portrait No %pretty_plural% + No services none Not logged in Notes: @@ -287,6 +289,7 @@ <p> Once you're approved, you'll get an email message and you can return to start using %system_name%. </p> Reject + Remember my login on this computer Remove Request membership of this community Request membership Index: openacs-4/packages/acs-subsite/lib/login.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/lib/login.tcl,v diff -u -r1.16 -r1.17 --- openacs-4/packages/acs-subsite/lib/login.tcl 16 Oct 2003 21:09:45 -0000 1.16 +++ openacs-4/packages/acs-subsite/lib/login.tcl 17 Oct 2003 17:51:07 -0000 1.17 @@ -71,7 +71,8 @@ set register_url [export_vars -no_empty -base $register_url { username email }] } -ad_form -name login -html { style "margin: 0px;" } -show_required_p 0 -edit_buttons { { "Login" ok } } -action "/register/" -form { +set login_button [list [list [_ acs-subsite.Log_In] ok]] +ad_form -name login -html { style "margin: 0px;" } -show_required_p 0 -edit_buttons $login_button -action "/register/" -form { {return_url:text(hidden)} {time:text(hidden)} {token_id:text(hidden)} @@ -85,7 +86,7 @@ set focus {} if { [auth::UseEmailForLoginP] } { - ad_form -extend -name login -form [list [list email:text($username_widget),nospell [list label "Email"]]] + ad_form -extend -name login -form [list [list email:text($username_widget),nospell [list label [_ acs-subsite.Email]]]] set user_id_widget_name email if { ![empty_string_p $email] } { set focus "password" @@ -96,13 +97,13 @@ if { [llength $authority_options] > 1 } { ad_form -extend -name login -form { {authority_id:integer(select) - {label "Authority"} + {label "[_ acs-subsite.Authority]"} {options $authority_options} } } } - ad_form -extend -name login -form [list [list username:text($username_widget),nospell [list label "Username"]]] + ad_form -extend -name login -form [list [list username:text($username_widget),nospell [list label [_ acs-subsite.Username]]]] set user_id_widget_name username if { ![empty_string_p $username] } { set focus "password" @@ -114,19 +115,21 @@ ad_form -extend -name login -form { {password:text(password) - {label "Password"} + {label "[_ acs-subsite.Password]"} } } +set options_list [list [list [_ acs-subsite.Remember_my_login] "t"]] if { $allow_persistent_login_p } { ad_form -extend -name login -form { {persistent_p:text(checkbox),optional {label ""} - {options { { "Remember my login on this computer" "t" } }} + {options $options_list} } } } +set expired_message [list [list message [_ acs-subsite.Login_has_expired]]] ad_form -extend -name login -on_request { # Populate fields from local vars @@ -150,7 +153,7 @@ if { [string compare $hash $computed_hash] != 0 || \ $time < [ns_time] - [ad_parameter -package_id [ad_acs_kernel_id] LoginExpirationTime security 600] } { - ad_returnredirect [export_vars -base [ad_conn url] { { message "The login page has expired. Please log in again." } }] + ad_returnredirect [export_vars -base [ad_conn url] $expired_message] ad_script_abort } Index: openacs-4/packages/acs-subsite/lib/services.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/lib/Attic/services.tcl,v diff -u -r1.1 -r1.2 --- openacs-4/packages/acs-subsite/lib/services.tcl 8 Oct 2003 07:32:42 -0000 1.1 +++ openacs-4/packages/acs-subsite/lib/services.tcl 17 Oct 2003 17:51:07 -0000 1.2 @@ -3,10 +3,10 @@ list::create \ -name services \ -multirow services \ - -no_data "No services" \ + -no_data "[_ acs-subsite.No_services]" \ -elements { instance_name { - label "Name" + label "[_ acs-subsite.Name]" link_url_eval {$name/} } } Index: openacs-4/packages/acs-subsite/lib/user-info.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/lib/user-info.tcl,v diff -u -r1.10 -r1.11 --- openacs-4/packages/acs-subsite/lib/user-info.tcl 7 Oct 2003 13:24:20 -0000 1.10 +++ openacs-4/packages/acs-subsite/lib/user-info.tcl 17 Oct 2003 17:51:07 -0000 1.11 @@ -62,7 +62,7 @@ ad_form -extend -name user_info -form { {authority_id:text(select) {mode $elm_mode(authority_id)} - {label "Authority"} + {label "[_ acs-subsite.Authority]"} {options {[auth::authority::get_authority_options]}} } } @@ -71,7 +71,7 @@ ([acs_user::site_wide_admin_p] && [llength [auth::authority::get_authority_options]] > 1) } { ad_form -extend -name user_info -form { {username:text(text) - {label "Username"} + {label "[_ acs-subsite.Username]"} {mode $elm_mode(username)} } } @@ -82,17 +82,17 @@ ad_form -extend -name user_info -form { {first_names:text - {label "First names"} + {label "[_ acs-subsite.First_names]"} {html {size 50}} {mode $elm_mode(first_names)} } {last_name:text - {label "Last Name"} + {label "[_ acs-subsite.Last_name]"} {html {size 50}} {mode $elm_mode(last_name)} } {email:text - {label "Email"} + {label "[_ acs-subsite.Email]"} {html {size 50}} {mode $elm_mode(email)} } @@ -102,7 +102,7 @@ ad_form -extend -name user_info -form \ [list \ [list screen_name:text[ad_decode [acs_user::ScreenName] "solicit" ",optional" ""] \ - {label "Screen name"} \ + {label "[_ acs-subsite.Screen_name]"} \ {html {size 50}} \ {mode $elm_mode(screen_name)} \ ]] @@ -111,12 +111,12 @@ ad_form -extend -name user_info -form { {url:text,optional - {label "Home Page"} + {label "[_ acs-subsite.Home_page]"} {html {size 50}} {mode $elm_mode(url)} } {bio:text(textarea),optional - {label "About yourself"} + {label "[_ acs-subsite.About_You]"} {html {rows 8 cols 60}} {mode $elm_mode(bio)} {display_value {[ad_text_to_html -- $user(bio)]}} Index: openacs-4/packages/acs-subsite/www/permissions/grant.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/www/permissions/grant.adp,v diff -u -r1.5 -r1.6 --- openacs-4/packages/acs-subsite/www/permissions/grant.adp 17 Oct 2003 09:19:31 -0000 1.5 +++ openacs-4/packages/acs-subsite/www/permissions/grant.adp 17 Oct 2003 17:51:07 -0000 1.6 @@ -9,7 +9,7 @@ - +
#acs-subsite.Grant_1# #acs-subsite.Grant#: