Index: openacs-4/packages/acs-authentication/catalog/acs-authentication.de_DE.ISO-8859-1.xml =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-authentication/catalog/acs-authentication.de_DE.ISO-8859-1.xml,v diff -u -N -r1.2.2.3 -r1.2.2.4 --- openacs-4/packages/acs-authentication/catalog/acs-authentication.de_DE.ISO-8859-1.xml 1 May 2006 22:06:13 -0000 1.2.2.3 +++ openacs-4/packages/acs-authentication/catalog/acs-authentication.de_DE.ISO-8859-1.xml 20 Nov 2006 20:00:10 -0000 1.2.2.4 @@ -1,5 +1,5 @@ - + Benutzeridentifikation oder Passwort ist falsch Index: openacs-4/packages/acs-authentication/catalog/acs-authentication.en_US.ISO-8859-1.xml =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-authentication/catalog/acs-authentication.en_US.ISO-8859-1.xml,v diff -u -N -r1.5.2.3 -r1.5.2.4 --- openacs-4/packages/acs-authentication/catalog/acs-authentication.en_US.ISO-8859-1.xml 1 May 2006 22:06:13 -0000 1.5.2.3 +++ openacs-4/packages/acs-authentication/catalog/acs-authentication.en_US.ISO-8859-1.xml 20 Nov 2006 20:00:10 -0000 1.5.2.4 @@ -1,5 +1,5 @@ - + Invalid username or password Index: openacs-4/packages/acs-content-repository/acs-content-repository.info =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-content-repository/acs-content-repository.info,v diff -u -N -r1.56.2.26 -r1.56.2.27 --- openacs-4/packages/acs-content-repository/acs-content-repository.info 26 May 2006 01:23:30 -0000 1.56.2.26 +++ openacs-4/packages/acs-content-repository/acs-content-repository.info 20 Nov 2006 20:00:10 -0000 1.56.2.27 @@ -6,20 +6,18 @@ Content Repository Services t t - + OpenACS - The canonical repository for OpenACS content. 2006-05-25 - 3 OpenACS - GPL - 3 Provides the API for creating and managing user generated content including full support for versioning, rendering content to the filesystem, folders and composite content items, and other CMS backing functionality. Utilized by Bug Tracker, File Storage, and other packages. + GPL + 3 @@ -29,8 +27,9 @@ - + + Index: openacs-4/packages/acs-content-repository/sql/postgresql/upgrade/upgrade-5.1.4d4-5.1.4d5.sql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-content-repository/sql/postgresql/upgrade/upgrade-5.1.4d4-5.1.4d5.sql,v diff -u -N -r1.3 -r1.3.2.1 --- openacs-4/packages/acs-content-repository/sql/postgresql/upgrade/upgrade-5.1.4d4-5.1.4d5.sql 24 Feb 2005 13:32:58 -0000 1.3 +++ openacs-4/packages/acs-content-repository/sql/postgresql/upgrade/upgrade-5.1.4d4-5.1.4d5.sql 20 Nov 2006 20:00:11 -0000 1.3.2.1 @@ -101,7 +101,7 @@ -- procedure delete select define_function_args('content_revision__del','revision_id'); -create or replace function content_revision__delete (integer) +create or replace function content_revision__del (integer) returns integer as ' declare delete__revision_id alias for $1; Index: openacs-4/packages/acs-content-repository/tcl/revision-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-content-repository/tcl/revision-procs.tcl,v diff -u -N -r1.21.2.5 -r1.21.2.6 --- openacs-4/packages/acs-content-repository/tcl/revision-procs.tcl 4 Feb 2006 17:42:20 -0000 1.21.2.5 +++ openacs-4/packages/acs-content-repository/tcl/revision-procs.tcl 20 Nov 2006 20:00:11 -0000 1.21.2.6 @@ -89,7 +89,12 @@ ns_set put [ns_conn outputheaders] "Content-Length" 0 ns_return 200 text/plain {} } else { - ns_returnfile 200 $mime_type $filename + set backgroundDelivery_p [ad_parameter -package_id [apm_package_id_from_key acs-content-repository] UseBackgroundDeliveryP files 0] + if {$backgroundDelivery_p} { + ad_returnfile_background 200 $mime_type $filename + } else { + ns_returnfile 200 $mime_type $filename + } } } } Index: openacs-4/packages/acs-datetime/tcl/acs-calendar-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-datetime/tcl/acs-calendar-procs.tcl,v diff -u -N -r1.21.2.1 -r1.21.2.2 --- openacs-4/packages/acs-datetime/tcl/acs-calendar-procs.tcl 18 Oct 2005 18:49:03 -0000 1.21.2.1 +++ openacs-4/packages/acs-datetime/tcl/acs-calendar-procs.tcl 20 Nov 2006 20:00:11 -0000 1.21.2.2 @@ -846,7 +846,7 @@ is [dt_ansi_to_pretty]
-
Date as YYYYMMDD +
Date as YYYYMMDD " Index: openacs-4/packages/acs-kernel/acs-kernel.info =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-kernel/acs-kernel.info,v diff -u -N -r1.80.2.21 -r1.80.2.22 --- openacs-4/packages/acs-kernel/acs-kernel.info 3 Nov 2006 22:19:21 -0000 1.80.2.21 +++ openacs-4/packages/acs-kernel/acs-kernel.info 20 Nov 2006 20:00:11 -0000 1.80.2.22 @@ -13,8 +13,6 @@ 2006-05-25 OpenACS The OpenACS kernel contains the core datamodel create and drop scripts for such things as objects, groups, partiies and the supporting PL/SQL and PL/pgSQL procedures. - GPL - 3 @@ -73,9 +71,11 @@ + + Index: openacs-4/packages/acs-kernel/catalog/acs-kernel.de_DE.ISO-8859-1.xml =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-kernel/catalog/acs-kernel.de_DE.ISO-8859-1.xml,v diff -u -N -r1.14.2.9 -r1.14.2.10 --- openacs-4/packages/acs-kernel/catalog/acs-kernel.de_DE.ISO-8859-1.xml 1 May 2006 22:08:43 -0000 1.14.2.9 +++ openacs-4/packages/acs-kernel/catalog/acs-kernel.de_DE.ISO-8859-1.xml 20 Nov 2006 20:00:11 -0000 1.14.2.10 @@ -1,5 +1,5 @@ - + Administrator Administratoren Index: openacs-4/packages/acs-lang/catalog/acs-lang.de_DE.ISO-8859-1.xml =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-lang/catalog/acs-lang.de_DE.ISO-8859-1.xml,v diff -u -N -r1.19.2.4 -r1.19.2.5 --- openacs-4/packages/acs-lang/catalog/acs-lang.de_DE.ISO-8859-1.xml 1 May 2006 22:10:47 -0000 1.19.2.4 +++ openacs-4/packages/acs-lang/catalog/acs-lang.de_DE.ISO-8859-1.xml 20 Nov 2006 20:00:12 -0000 1.19.2.5 @@ -1,5 +1,5 @@ - + Deutsche Version verf�gbar Sprache wechseln Index: openacs-4/packages/acs-lang/catalog/acs-lang.en_US.ISO-8859-1.xml =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-lang/catalog/acs-lang.en_US.ISO-8859-1.xml,v diff -u -N -r1.22.2.4 -r1.22.2.5 --- openacs-4/packages/acs-lang/catalog/acs-lang.en_US.ISO-8859-1.xml 1 May 2006 22:10:47 -0000 1.22.2.4 +++ openacs-4/packages/acs-lang/catalog/acs-lang.en_US.ISO-8859-1.xml 20 Nov 2006 20:00:12 -0000 1.22.2.5 @@ -1,5 +1,5 @@ - + Available in English The language referred to in the message body should be the language of the locale, not a localized version of "English". Index: openacs-4/packages/acs-lang/tcl/lang-message-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-lang/tcl/lang-message-procs.tcl,v diff -u -N -r1.45.2.1 -r1.45.2.2 --- openacs-4/packages/acs-lang/tcl/lang-message-procs.tcl 12 Mar 2006 22:16:37 -0000 1.45.2.1 +++ openacs-4/packages/acs-lang/tcl/lang-message-procs.tcl 20 Nov 2006 20:00:12 -0000 1.45.2.2 @@ -764,7 +764,7 @@ if { [message_exists_p $locale $key] } { set message [nsv_get lang_message_$locale $key] } else { - ns_log Error "lang::message::lookup: Key '$key' does not exist in en_US" + ns_log Error "lang::message::lookup: Key '$key' does not exist in en_US\nUser_id [ad_conn user_id]\n[ad_url][util_get_current_url]" set message "MESSAGE KEY MISSING: '$key'" } } Index: openacs-4/packages/acs-lang/www/admin/localized-message-new.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-lang/www/admin/localized-message-new.tcl,v diff -u -N -r1.7.2.1 -r1.7.2.2 --- openacs-4/packages/acs-lang/www/admin/localized-message-new.tcl 20 Jul 2005 16:03:48 -0000 1.7.2.1 +++ openacs-4/packages/acs-lang/www/admin/localized-message-new.tcl 20 Nov 2006 20:00:12 -0000 1.7.2.2 @@ -58,6 +58,8 @@ # processing of the form element create message_new locale -label "locale" -datatype text -widget hidden +set focus "" + if { [form is_request message_new] } { element set_value message_new package_key $package_key Index: openacs-4/packages/acs-subsite/catalog/acs-subsite.de_DE.ISO-8859-1.xml =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/catalog/acs-subsite.de_DE.ISO-8859-1.xml,v diff -u -N -r1.23.2.7 -r1.23.2.8 --- openacs-4/packages/acs-subsite/catalog/acs-subsite.de_DE.ISO-8859-1.xml 1 May 2006 22:12:39 -0000 1.23.2.7 +++ openacs-4/packages/acs-subsite/catalog/acs-subsite.de_DE.ISO-8859-1.xml 20 Nov 2006 20:00:12 -0000 1.23.2.8 @@ -1,5 +1,5 @@ - + oder Die Allgemeinen Informationen aktualisieren @@ -196,7 +196,7 @@ H�here Rechte schlie�en niedrigere Rechte mit ein. Wenn Sie etwa Verwaltungsrechte erteilen, werden automatisch auch Lese- und Schreibrechte gew�hrt. Es ist ein Authentifizierungsproblem aufgetreten. Die Registrierungsinformationen f�r diesen Dienst wurden an %email% gesendet. - Die Registrierungsinformationen f�r diesen Dienst wurden an %email% gesendet. + Die Registrierungsinformationen f�r diesen Dienst wurden an %email% gesendet. Ihr Registrierungsantrag wurde an den Administrator von %system_name% �bermittelt. Sie wurden noch nicht freigeschaltet. E-Mail-Adresse und Passwort werden gespeichert. 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 -N -r1.67.2.14 -r1.67.2.15 --- openacs-4/packages/acs-subsite/catalog/acs-subsite.en_US.ISO-8859-1.xml 25 May 2006 17:09:58 -0000 1.67.2.14 +++ openacs-4/packages/acs-subsite/catalog/acs-subsite.en_US.ISO-8859-1.xml 20 Nov 2006 20:00:12 -0000 1.67.2.15 @@ -1,5 +1,5 @@ - + , or Update Basic Information @@ -275,14 +275,14 @@ This user doesn't have a portrait yet. You can This user is deleted and banned from the community. To confirm your registration, please go to %confirmation_url% - Upload your favorite file, a scanned JPEG or GIF, from your desktop -computer system (note that you can't refer to an image elsewhere on + Upload your favorite file, a scanned JPEG or GIF, from your desktop +computer system (note that you can't refer to an image elsewhere on the Internet; this image must be on your computer's hard drive). Uploaded: %pretty_date% Uploaded: %publish_date% Use the "Browse..." button to locate your file, then click "Open". This user has a entered a biography or uploaded a portrait - We can't find you (user %user_id%) in the users table. Probably your + We can't find you (user %user_id%) in the users table. Probably your account was deleted for some reason. We had a problem processing your entry. We were not awaiting your email. There must be some mistake. @@ -422,7 +422,7 @@ This group is closed. New members can only get access by invitation. this subsite This user has left the community. - Please check your inbox. Within the next few minutes, you should find a message from %system_owner% with instructions on + Please check your inbox. Within the next few minutes, you should find a message from %system_owner% with instructions on Topic type-specific info 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 -N -r1.24.2.4 -r1.24.2.5 --- openacs-4/packages/acs-subsite/lib/login.tcl 16 Jun 2006 13:53:42 -0000 1.24.2.4 +++ openacs-4/packages/acs-subsite/lib/login.tcl 20 Nov 2006 20:00:12 -0000 1.24.2.5 @@ -14,6 +14,8 @@ security::require_secure_conn } +set change_locale_url "/acs-lang/?[export_vars { { package_id "[ad_conn package_id]" } }]" + set self_registration [parameter::get_from_package_key \ -package_key acs-authentication \ -parameter AllowSelfRegister \ Index: openacs-4/packages/acs-subsite/www/permissions/perm-include-postgresql.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/www/permissions/perm-include-postgresql.xql,v diff -u -N -r1.4 -r1.4.2.1 --- openacs-4/packages/acs-subsite/www/permissions/perm-include-postgresql.xql 24 Feb 2005 13:33:01 -0000 1.4 +++ openacs-4/packages/acs-subsite/www/permissions/perm-include-postgresql.xql 20 Nov 2006 20:00:12 -0000 1.4.2.1 @@ -57,7 +57,11 @@ ) ptab, acs_objects o where o.object_id = ptab.grantee_id - and not exists (select 1 from acs_object_party_privilege_map p where p.object_id = acs__magic_object_id('security_context_root') and p.party_id = ptab.grantee_id and p.privilege = 'admin') + and not exists (select 1 + from acs_object_party_privilege_map m + where m.object_id = acs__magic_object_id('security_context_root') + and m.party_id = ptab.grantee_id + and m.privilege = 'admin') group by ptab.grantee_id, grantee_name, object_type order by object_type desc, grantee_name Index: openacs-4/packages/acs-subsite/www/shared/whos-online.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/www/shared/whos-online.tcl,v diff -u -N -r1.8 -r1.8.6.1 --- openacs-4/packages/acs-subsite/www/shared/whos-online.tcl 16 Feb 2004 14:48:15 -0000 1.8 +++ openacs-4/packages/acs-subsite/www/shared/whos-online.tcl 20 Nov 2006 20:00:13 -0000 1.8.6.1 @@ -9,22 +9,23 @@ context:onevalue } -set title "Who's Online?" +#unima2-kk "Who's online" - acs-subsite.shared_whos_online +set title [_ acs-subsite.shared_whos_online] set context [list "Who's Online"] set whos_online_interval [whos_online::interval] template::list::create \ -name online_users \ -multirow online_users \ - -no_data "No registered users online" \ + -no_data [_ acs-subsite.shared_no_user_online] \ -elements { name { - label "User name" + label "#acs-subsite.shared_user_name#" link_url_col url } online_time_pretty { - label "Online Time" + label "#acs-subsite.shared_online_time#" html { align right } } } @@ -39,7 +40,7 @@ lappend users [list \ "$user(first_names) $user(last_name)" \ [acs_community_member_url -user_id $user_id] \ - "$first_request_minutes minutes"] + "$first_request_minutes #acs-subsite.shared_minutes#"] } Index: openacs-4/packages/acs-subsite/www/user/portrait/index.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/www/user/portrait/index.tcl,v diff -u -N -r1.8 -r1.8.2.1 --- openacs-4/packages/acs-subsite/www/user/portrait/index.tcl 1 Mar 2005 00:01:24 -0000 1.8 +++ openacs-4/packages/acs-subsite/www/user/portrait/index.tcl 20 Nov 2006 20:00:13 -0000 1.8.2.1 @@ -64,7 +64,7 @@ from acs_rels a, cr_items c where a.object_id_two = c.item_id and a.object_id_one = :user_id -and a.rel_type = 'user_portrait_rel'"] || [empty_string_p $revision_id]} { +and a.rel_type = 'user_portrait_rel' limit 1"] || [empty_string_p $revision_id]} { # The user doesn't have a portrait yet set portrait_p 0 } else { Index: openacs-4/packages/acs-tcl/catalog/acs-tcl.de_DE.ISO-8859-1.xml =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/catalog/acs-tcl.de_DE.ISO-8859-1.xml,v diff -u -N -r1.13.2.9 -r1.13.2.10 --- openacs-4/packages/acs-tcl/catalog/acs-tcl.de_DE.ISO-8859-1.xml 1 May 2006 22:14:30 -0000 1.13.2.9 +++ openacs-4/packages/acs-tcl/catalog/acs-tcl.de_DE.ISO-8859-1.xml 20 Nov 2006 20:00:13 -0000 1.13.2.10 @@ -1,5 +1,5 @@ - + Ein Problem Freischalten Index: openacs-4/packages/acs-tcl/catalog/acs-tcl.en_US.ISO-8859-1.xml =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/catalog/acs-tcl.en_US.ISO-8859-1.xml,v diff -u -N -r1.17.2.9 -r1.17.2.10 --- openacs-4/packages/acs-tcl/catalog/acs-tcl.en_US.ISO-8859-1.xml 25 May 2006 17:09:58 -0000 1.17.2.9 +++ openacs-4/packages/acs-tcl/catalog/acs-tcl.en_US.ISO-8859-1.xml 20 Nov 2006 20:00:13 -0000 1.17.2.10 @@ -1,5 +1,5 @@ - + a problem approve Index: openacs-4/packages/acs-tcl/tcl/apm-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/tcl/apm-procs.tcl,v diff -u -N -r1.74 -r1.74.2.1 --- openacs-4/packages/acs-tcl/tcl/apm-procs.tcl 26 Feb 2005 17:52:20 -0000 1.74 +++ openacs-4/packages/acs-tcl/tcl/apm-procs.tcl 20 Nov 2006 20:00:13 -0000 1.74.2.1 @@ -1004,10 +1004,11 @@ unmemoized version of apm_package_id_from_key } { return [db_string apm_package_id_from_key { - select package_id from apm_packages where package_key = :package_key + select package_id from apm_packages where package_key = :package_key } -default 0] } + # # package_id -> package_url # Index: openacs-4/packages/acs-tcl/tcl/security-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/tcl/security-procs.tcl,v diff -u -N -r1.38 -r1.38.2.1 --- openacs-4/packages/acs-tcl/tcl/security-procs.tcl 1 Mar 2005 00:01:25 -0000 1.38 +++ openacs-4/packages/acs-tcl/tcl/security-procs.tcl 20 Nov 2006 20:00:13 -0000 1.38.2.1 @@ -470,12 +470,24 @@ ad_set_signed_cookie -secure t "ad_secure_token" "[ad_conn session_id],[ad_conn user_id],[ns_time]" } -ad_proc -public -deprecated -warn ad_secure_conn_p {} { - Use security::secure_conn_p instead. +ad_proc -public ad_secure_conn_p {} { + Returns true if the connection [ad_conn] is secure (HTTPS), or + false otherwise. Takes into account that the web server might be + behind a SSL proxy. If so, all connections from the SSL proxy to + the server use the HTTP protocol but HTTPS requests to the SSL + proxy have an additional header. These HTTPS requests can be + identified by the header 'X-SSL-Request' with value 'true'. + + Supports reverse proxies. See kernel parameter UseReverseProxyP - @see security::secure_conn_p + @see security::secure_conn_p } { - return [security::secure_conn_p] + + if {[ad_parameter -package_id [ad_acs_kernel_id] UseReverseProxyP security 0]} { + return [expr [string match "https:*" [ad_conn location]] || [string equal "true" [ns_set get [ad_conn headers] X-SSL-Request]]] + } else { + return [security::secure_conn_p] + } } @@ -1331,7 +1343,11 @@ ad_proc -public security::secure_conn_p {} { Returns true if the connection [ad_conn] is secure (HTTPS), or false otherwise. } { - return [string match "https:*" [util_current_location]] + if {[string equal [ns_set get [ns_conn headers] "X-SSL-Request"] 1]} { + return 1 + } else { + return [string match "https:*" [util_current_location]] + } } ad_proc -public security::RestrictLoginToSSLP {} { @@ -1490,8 +1506,12 @@ set secure_location $current_location } else { # Current location is insecure - get location from config file - set secure_location [ad_conn location] - # Prefix with https + if {[ad_parameter -package_id [ad_acs_kernel_id] UseReverseProxyP security 0]} { + set secure_location $current_location + } else { + set secure_location [ad_conn location] + } + # Prefix with https regsub {^(?:http://)?} $secure_location {https://} secure_location # remove port number if using nonstandard port Index: openacs-4/packages/acs-templating/catalog/acs-templating.de_DE.ISO-8859-1.xml =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-templating/catalog/acs-templating.de_DE.ISO-8859-1.xml,v diff -u -N -r1.6.2.4 -r1.6.2.5 --- openacs-4/packages/acs-templating/catalog/acs-templating.de_DE.ISO-8859-1.xml 1 May 2006 22:17:08 -0000 1.6.2.4 +++ openacs-4/packages/acs-templating/catalog/acs-templating.de_DE.ISO-8859-1.xml 20 Nov 2006 20:00:13 -0000 1.6.2.5 @@ -1,5 +1,5 @@ - + 12-st�ndig 24-st�ndig Index: openacs-4/packages/acs-templating/catalog/acs-templating.en_US.ISO-8859-1.xml =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-templating/catalog/acs-templating.en_US.ISO-8859-1.xml,v diff -u -N -r1.12.2.7 -r1.12.2.8 --- openacs-4/packages/acs-templating/catalog/acs-templating.en_US.ISO-8859-1.xml 1 May 2006 22:17:08 -0000 1.12.2.7 +++ openacs-4/packages/acs-templating/catalog/acs-templating.en_US.ISO-8859-1.xml 20 Nov 2006 20:00:13 -0000 1.12.2.8 @@ -1,5 +1,5 @@ - + 12-Hour 24-Hour Index: openacs-4/packages/assessment/catalog/assessment.de_DE.ISO-8859-1.xml =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/assessment/catalog/assessment.de_DE.ISO-8859-1.xml,v diff -u -N -r1.4.2.3 -r1.4.2.4 --- openacs-4/packages/assessment/catalog/assessment.de_DE.ISO-8859-1.xml 31 Jul 2006 06:27:12 -0000 1.4.2.3 +++ openacs-4/packages/assessment/catalog/assessment.de_DE.ISO-8859-1.xml 20 Nov 2006 20:00:14 -0000 1.4.2.4 @@ -32,6 +32,7 @@ Alle Erlaube Randomisierung Anonyme Antworten + Assessment Genehmigen Aktionen genehmigen Genehmigt @@ -59,8 +60,10 @@ Wieviele Minuten darf der User f�r die Beantwortung des gesamten Assessments ben�tigen. leeres Feld f�r unbefristet. Hilfetext f�r den Titel des Assessments Assessment + Assessment Administration Dies erlaubt es Ihnen, Ihrem Assessment einen speziellen einzigartigen Indentifikator zuzuweisen z.B. einen Code. Titel + Assessments Nach User Zeitliche Verf�gbarkeit �ndern (alle) Zeitliche Verf�gbarkeit �ndern @@ -101,6 +104,7 @@ Ein Assessment/Test: %assessment_data.title% Nur bei korrekten Antworten Nur bei falschen Antworten + Assessment �ffnen Beschreibung ausgef�hrt Zugriffsberechtigungen @@ -114,6 +118,7 @@ Navigation ausw�hlen Abschnitte Secure Access ben�tigt + Sessions Feedback anzeigen Namen der Frage anzeigen Spezifisches Datum Index: openacs-4/packages/assessment-portlet/catalog/assessment-portlet.en_US.ISO-8859-1.xml =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/assessment-portlet/catalog/assessment-portlet.en_US.ISO-8859-1.xml,v diff -u -N -r1.1.2.3 -r1.1.2.4 --- openacs-4/packages/assessment-portlet/catalog/assessment-portlet.en_US.ISO-8859-1.xml 31 Jul 2006 06:27:12 -0000 1.1.2.3 +++ openacs-4/packages/assessment-portlet/catalog/assessment-portlet.en_US.ISO-8859-1.xml 20 Nov 2006 20:00:14 -0000 1.1.2.4 @@ -1,5 +1,5 @@ - + assessment admin There should be only one instance of assessment for admin purpose Index: openacs-4/packages/bm-portlet/catalog/bm-portlet.de_DE.ISO-8859-1.xml =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/bm-portlet/catalog/bm-portlet.de_DE.ISO-8859-1.xml,v diff -u -N -r1.13.2.2 -r1.13.2.3 --- openacs-4/packages/bm-portlet/catalog/bm-portlet.de_DE.ISO-8859-1.xml 31 Jul 2006 06:27:12 -0000 1.13.2.2 +++ openacs-4/packages/bm-portlet/catalog/bm-portlet.de_DE.ISO-8859-1.xml 20 Nov 2006 20:00:14 -0000 1.13.2.3 @@ -1,5 +1,5 @@ - + Neue %spam_name% verfassen Gruppen-E-Mails Index: openacs-4/packages/bm-portlet/catalog/bm-portlet.en_US.ISO-8859-1.xml =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/bm-portlet/catalog/bm-portlet.en_US.ISO-8859-1.xml,v diff -u -N -r1.14.2.2 -r1.14.2.3 --- openacs-4/packages/bm-portlet/catalog/bm-portlet.en_US.ISO-8859-1.xml 31 Jul 2006 06:27:12 -0000 1.14.2.2 +++ openacs-4/packages/bm-portlet/catalog/bm-portlet.en_US.ISO-8859-1.xml 20 Nov 2006 20:00:14 -0000 1.14.2.3 @@ -1,5 +1,5 @@ - + New %spam_name% The text in the link for creating a new bulk mailing. Index: openacs-4/packages/bm-portlet/www/bm-portlet.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/bm-portlet/www/bm-portlet.adp,v diff -u -N -r1.4 -r1.4.2.1 --- openacs-4/packages/bm-portlet/www/bm-portlet.adp 29 Jun 2004 10:17:47 -0000 1.4 +++ openacs-4/packages/bm-portlet/www/bm-portlet.adp 20 Nov 2006 20:00:14 -0000 1.4.2.1 @@ -18,7 +18,14 @@ %> + + + + + #new-portal.when_portlet_shaded# + + Index: openacs-4/packages/calendar/calendar.info =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/calendar/calendar.info,v diff -u -N -r1.31.2.4 -r1.31.2.5 --- openacs-4/packages/calendar/calendar.info 1 Dec 2005 22:37:33 -0000 1.31.2.4 +++ openacs-4/packages/calendar/calendar.info 20 Nov 2006 20:00:14 -0000 1.31.2.5 @@ -13,6 +13,7 @@ 2004-03-04 OpenACS Manage group and shared calendars with download. + 0 @@ -21,14 +22,15 @@ - + - + Index: openacs-4/packages/calendar/catalog/calendar.de_DE.ISO-8859-1.xml =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/calendar/catalog/calendar.de_DE.ISO-8859-1.xml,v diff -u -N -r1.12.2.7 -r1.12.2.8 --- openacs-4/packages/calendar/catalog/calendar.de_DE.ISO-8859-1.xml 10 Nov 2006 11:12:33 -0000 1.12.2.7 +++ openacs-4/packages/calendar/catalog/calendar.de_DE.ISO-8859-1.xml 20 Nov 2006 20:00:14 -0000 1.12.2.8 @@ -5,6 +5,7 @@ Hinzuf�gen Hinzuf�gen Neue Zielgruppe hinzuf�gen + Ganzt�giges Ereignis hinzuf�gen Neuen Eintrag hinzuf�gen Einen Eintrag hinzuf�gen Eintrag hinzuf�gen @@ -45,6 +46,8 @@ Ereignisse innerhalb eines Zeitraums von Freitag von + /resources/acs-subsite/go_de_DE.gif + Gehe zum Datum Gehe zu %months.name% Gehe zum Jahr %next_year% Gehe zum Jahr %prev_year% @@ -85,6 +88,7 @@ You have no party wide calendars Montag Neue Eintragskategorie: + n�chster Tag Next Month Next Year Nein @@ -94,6 +98,7 @@ Hinweis des Monats   + Vortag Previous Month Previous Year Privat: Index: openacs-4/packages/calendar/catalog/calendar.en_US.ISO-8859-1.xml =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/calendar/catalog/calendar.en_US.ISO-8859-1.xml,v diff -u -N -r1.26.2.9 -r1.26.2.10 --- openacs-4/packages/calendar/catalog/calendar.en_US.ISO-8859-1.xml 10 Nov 2006 11:12:33 -0000 1.26.2.9 +++ openacs-4/packages/calendar/catalog/calendar.en_US.ISO-8859-1.xml 20 Nov 2006 20:00:14 -0000 1.26.2.10 @@ -56,6 +56,7 @@ Events over a Friday from + /resources/acs-subsite/go.gif Go to date Go to %months.name% Go to year %next_year% Index: openacs-4/packages/calendar/www/cal-options.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/calendar/www/cal-options.adp,v diff -u -N -r1.8 -r1.8.6.1 --- openacs-4/packages/calendar/www/cal-options.adp 25 Feb 2004 13:07:08 -0000 1.8 +++ openacs-4/packages/calendar/www/cal-options.adp 20 Nov 2006 20:00:15 -0000 1.8.6.1 @@ -1,12 +1,12 @@

-#calendar.Calendars#:

  • @calendars.calendar_name@
    - [Manage Types] + [ + #calendar-portlet.Manage_Item_Types#]
Index: openacs-4/packages/calendar/www/calendar-item-types.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/calendar/www/calendar-item-types.tcl,v diff -u -N -r1.3 -r1.3.12.1 --- openacs-4/packages/calendar/www/calendar-item-types.tcl 10 Sep 2002 22:22:31 -0000 1.3 +++ openacs-4/packages/calendar/www/calendar-item-types.tcl 20 Nov 2006 20:00:15 -0000 1.3.12.1 @@ -16,6 +16,3 @@ # List the item types and allow addition of a new one set item_types [calendar::get_item_types -calendar_id $calendar_id] set context [list "Item Types"] - - - Index: openacs-4/packages/calendar/www/mini-calendar.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/calendar/www/mini-calendar.adp,v diff -u -N -r1.16.2.4 -r1.16.2.5 --- openacs-4/packages/calendar/www/mini-calendar.adp 3 Nov 2006 22:31:41 -0000 1.16.2.4 +++ openacs-4/packages/calendar/www/mini-calendar.adp 20 Nov 2006 20:00:15 -0000 1.16.2.5 @@ -115,7 +115,7 @@ - +
#acs-datetime.Date_as_YYYYMMDD# @form_vars;noquote@ Index: openacs-4/packages/calendar/www/mini-calendar.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/calendar/www/mini-calendar.tcl,v diff -u -N -r1.15.2.1 -r1.15.2.2 --- openacs-4/packages/calendar/www/mini-calendar.tcl 19 Jun 2005 07:49:35 -0000 1.15.2.1 +++ openacs-4/packages/calendar/www/mini-calendar.tcl 20 Nov 2006 20:00:15 -0000 1.15.2.2 @@ -16,7 +16,7 @@ # Determine whether we need to pass on the period_days variable from the list view if {[string equal $view list]} { - if {![exists_and_not_null period_days] || [string equal $period_days [parameter::get -parameter ListView_DefaultPeriodDays -default 31]]} { + if {![exists_and_not_null period_days] || [string equal $period_days [parameter::get -parameter DefaultPeriodDays -default 31]]} { set url_stub_period_days "" } else { set url_stub_period_days "&period_days=${period_days}" Index: openacs-4/packages/calendar/www/view-list-display.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/calendar/www/view-list-display.tcl,v diff -u -N -r1.25.2.2 -r1.25.2.3 --- openacs-4/packages/calendar/www/view-list-display.tcl 16 Aug 2006 17:20:33 -0000 1.25.2.2 +++ openacs-4/packages/calendar/www/view-list-display.tcl 20 Nov 2006 20:00:15 -0000 1.25.2.3 @@ -1,3 +1,13 @@ +if { ![info exists period_days] } { + ad_page_contract { + Some documentation. + @author Sven Schmitt (s.lrn@gmx.net) + @cvs-id $Id$ + } { + {period_days:integer {[parameter::get -parameter DefaultPeriodDays -default 31]}} + } +} + if {[info exists url_stub_callback]} { # This parameter is only set if this file is called from .LRN. # This way I make sure that for the time being this adp/tcl @@ -47,11 +57,7 @@ set calendars_clause [db_map dbqd.calendar.www.views.openacs_calendar] } -if { ![info exists period_days] } { - set period_days [parameter::get -parameter ListView_DefaultPeriodDays -default 31] -} else { - set end_date [clock format [clock scan "+${period_days} days" -base [clock scan $start_date]] -format "%Y-%m-%d 00:00"] -} +set end_date [clock format [clock scan "+${period_days} days" -base [clock scan $start_date]] -format "%Y-%m-%d 00:00"] set package_id [ad_conn package_id] set user_id [ad_conn user_id] Index: openacs-4/packages/calendar/www/view.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/calendar/www/view.adp,v diff -u -N -r1.28.6.1 -r1.28.6.2 --- openacs-4/packages/calendar/www/view.adp 16 Aug 2006 17:20:33 -0000 1.28.6.1 +++ openacs-4/packages/calendar/www/view.adp 20 Nov 2006 20:00:15 -0000 1.28.6.2 @@ -37,7 +37,6 @@ show_calendar_name_p=@show_calendar_name_p@>
- Index: openacs-4/packages/calendar/www/view.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/calendar/www/view.tcl,v diff -u -N -r1.22.2.1 -r1.22.2.2 --- openacs-4/packages/calendar/www/view.tcl 16 Aug 2006 17:20:33 -0000 1.22.2.1 +++ openacs-4/packages/calendar/www/view.tcl 20 Nov 2006 20:00:15 -0000 1.22.2.2 @@ -11,7 +11,7 @@ {date ""} {sort_by ""} {start_date ""} - {period_days:integer {[parameter::get -parameter ListView_DefaultPeriodDays -default 31]}} + {period_days:integer {[parameter::get -parameter DefaultPeriodDays -default 31]}} } -validate { valid_date -requires { date } { if {![string equal $date ""]} { Index: openacs-4/packages/calendar-portlet/catalog/calendar-portlet.de_DE.ISO-8859-1.xml =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/calendar-portlet/catalog/calendar-portlet.de_DE.ISO-8859-1.xml,v diff -u -N -r1.12.2.4 -r1.12.2.5 --- openacs-4/packages/calendar-portlet/catalog/calendar-portlet.de_DE.ISO-8859-1.xml 31 Jul 2006 06:27:13 -0000 1.12.2.4 +++ openacs-4/packages/calendar-portlet/catalog/calendar-portlet.de_DE.ISO-8859-1.xml 20 Nov 2006 20:00:15 -0000 1.12.2.5 @@ -1,12 +1,13 @@ - + Eintrag hinzuf�gen Kalender verwalten Neuen Eintrag hinzuf�gen Kalender Eintragskategorien �ndern Eintragskategorien �ndern + Angezeigter Zeitraum (in Tagen): Kalender Tagesplan Index: openacs-4/packages/calendar-portlet/catalog/calendar-portlet.en_US.ISO-8859-1.xml =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/calendar-portlet/catalog/calendar-portlet.en_US.ISO-8859-1.xml,v diff -u -N -r1.14.2.4 -r1.14.2.5 --- openacs-4/packages/calendar-portlet/catalog/calendar-portlet.en_US.ISO-8859-1.xml 31 Jul 2006 06:27:13 -0000 1.14.2.4 +++ openacs-4/packages/calendar-portlet/catalog/calendar-portlet.en_US.ISO-8859-1.xml 20 Nov 2006 20:00:15 -0000 1.14.2.5 @@ -1,12 +1,13 @@ - + Add an item Calendar Administration Create a new Event Full Calendar Manage Calendar Event Types Manage Item Types + Default period shown (in days): Calendar Schedule Index: openacs-4/packages/calendar-portlet/www/calendar-admin-portlet.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/calendar-portlet/www/calendar-admin-portlet.adp,v diff -u -N -r1.6.8.2 -r1.6.8.3 --- openacs-4/packages/calendar-portlet/www/calendar-admin-portlet.adp 16 Nov 2006 10:02:15 -0000 1.6.8.2 +++ openacs-4/packages/calendar-portlet/www/calendar-admin-portlet.adp 20 Nov 2006 20:00:15 -0000 1.6.8.3 @@ -20,7 +20,11 @@ - Index: openacs-4/packages/calendar-portlet/www/calendar-admin-portlet.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/calendar-portlet/www/calendar-admin-portlet.tcl,v diff -u -N -r1.3.12.1 -r1.3.12.2 --- openacs-4/packages/calendar-portlet/www/calendar-admin-portlet.tcl 9 Nov 2006 19:40:27 -0000 1.3.12.1 +++ openacs-4/packages/calendar-portlet/www/calendar-admin-portlet.tcl 20 Nov 2006 20:00:15 -0000 1.3.12.2 @@ -21,6 +21,8 @@ @author Arjun Sanyal (arjun@openforce.net) @author Ben Adida (ben@openforce.net) @cvs_id $Id$ +} { + {period_days:optional} } -properties { } @@ -30,6 +32,15 @@ set view $config(default_view) set list_of_calendar_ids $config(calendar_id) +set calendar_id [lindex $list_of_calendar_ids 0] +db_0or1row select_calendar_package_id {select package_id from calendars where calendar_id=:calendar_id} + +if { ![info exists period_days] } { + set period_days [parameter::get -package_id $package_id -parameter DefaultPeriodDays] +} else { + parameter::set_value -package_id $package_id -parameter DefaultPeriodDays -value $period_days +} + if {[llength $list_of_calendar_ids] > 1} { return -code error "shouldn't be more than one calendar in admin!" } Index: openacs-4/packages/calendar-portlet/www/calendar-full-portlet.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/calendar-portlet/www/calendar-full-portlet.adp,v diff -u -N -r1.24.2.2 -r1.24.2.3 --- openacs-4/packages/calendar-portlet/www/calendar-full-portlet.adp 16 Nov 2006 13:06:14 -0000 1.24.2.2 +++ openacs-4/packages/calendar-portlet/www/calendar-full-portlet.adp 20 Nov 2006 20:00:15 -0000 1.24.2.3 @@ -103,7 +103,7 @@ -
+ + #new-portal.when_portlet_shaded# +
- - Index: openacs-4/packages/calendar-portlet/www/calendar-full-portlet.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/calendar-portlet/www/calendar-full-portlet.tcl,v diff -u -N -r1.34 -r1.34.2.1 --- openacs-4/packages/calendar-portlet/www/calendar-full-portlet.tcl 2 May 2005 12:45:03 -0000 1.34 +++ openacs-4/packages/calendar-portlet/www/calendar-full-portlet.tcl 20 Nov 2006 20:00:15 -0000 1.34.2.1 @@ -24,7 +24,7 @@ {view ""} {page_num ""} {date ""} - {period_days 30} + {period_days:optional} {julian_date ""} } -properties { @@ -46,6 +46,38 @@ } set list_of_calendar_ids $config(calendar_id) +# Set the community. Is set to NULL if under dotlrn +set community_id [dotlrn_community::get_community_id] + +# Set the first list entry to calendar_id. Will not be used if under +# dotlrn. Otherwise the list will actually contain only one calendar_id (the +# first one, though) +set calendar_id [lindex $list_of_calendar_ids 0] + +# Get the package_id depending on which calender_id was set +db_0or1row select_calendar_package_id {select package_id from calendars where calendar_id=:calendar_id} + +# If period_days was NOT passed to the site, it will be reset with the +# corresponding parameter value +if { ![info exists period_days] } { + # Check if under dotlrn or in a community and set period_days to the + # relevant parameter + if { [exists_and_not_null community_id] } { + # in a community the correct package_id is already set and can be used + set period_days [parameter::get -package_id $package_id -parameter DefaultPeriodDays -default 31] + } else { + foreach calendar $list_of_calendar_ids { + # returns 1 if calendar_id is user's personal calendar + if { [calendar::personal_p -calendar_id $calendar] } { + # get the package_id of this calendar and the corresponding parameter + db_0or1row select_calendar_package_id {select package_id from calendars where calendar_id=:calendar} + set period_days [parameter::get -package_id $package_id -parameter DefaultPeriodDays -default 31] + break + } + } + } +} + set ad_conn_url [ad_conn url] set base_url [ad_conn package_url] Index: openacs-4/packages/calendar-portlet/www/calendar-list-portlet.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/calendar-portlet/www/calendar-list-portlet.adp,v diff -u -N -r1.8 -r1.8.2.1 --- openacs-4/packages/calendar-portlet/www/calendar-list-portlet.adp 30 Jun 2004 16:37:07 -0000 1.8 +++ openacs-4/packages/calendar-portlet/www/calendar-list-portlet.adp 20 Nov 2006 20:00:15 -0000 1.8.2.1 @@ -35,5 +35,7 @@ sort_by=@sort_by@> -
-
+ + #new-portal.when_portlet_shaded# + + \ No newline at end of file Index: openacs-4/packages/calendar-portlet/www/calendar-list-portlet.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/calendar-portlet/www/calendar-list-portlet.tcl,v diff -u -N -r1.9.2.1 -r1.9.2.2 --- openacs-4/packages/calendar-portlet/www/calendar-list-portlet.tcl 2 Jun 2005 08:58:52 -0000 1.9.2.1 +++ openacs-4/packages/calendar-portlet/www/calendar-list-portlet.tcl 20 Nov 2006 20:00:15 -0000 1.9.2.2 @@ -25,7 +25,7 @@ {page_num ""} {date ""} {julian_date ""} - {period_days 60} + {period_days:optional} {sort_by ""} } -properties { @@ -47,6 +47,17 @@ } set list_of_calendar_ids $config(calendar_id) +# Set the first list entry to calendar_id. Will not be used if under +# dotlrn. Otherwise the list will actually contain only one calendar_id +# (the first one, though) +set calendar_id [lindex $list_of_calendar_ids 0] +# Get the package_id depending on which calender_id was set +db_0or1row select_calendar_package_id {select package_id from calendars where calendar_id=:calendar_id} + +if { ![info exists period_days] } { + set period_days [parameter::get -package_id $package_id -parameter DefaultPeriodDays -default 31] +} + set scoped_p $config(scoped_p) if {$scoped_p == "t"} { set show_calendar_name_p 1 Index: openacs-4/packages/calendar-portlet/www/calendar-portlet.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/calendar-portlet/www/calendar-portlet.adp,v diff -u -N -r1.16 -r1.16.2.1 --- openacs-4/packages/calendar-portlet/www/calendar-portlet.adp 17 May 2004 15:15:01 -0000 1.16 +++ openacs-4/packages/calendar-portlet/www/calendar-portlet.adp 20 Nov 2006 20:00:15 -0000 1.16.2.1 @@ -80,5 +80,7 @@ -   - + + #new-portal.when_portlet_shaded# + + \ No newline at end of file Index: openacs-4/packages/calendar-portlet/www/calendar-portlet.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/calendar-portlet/www/calendar-portlet.tcl,v diff -u -N -r1.28.2.2 -r1.28.2.3 --- openacs-4/packages/calendar-portlet/www/calendar-portlet.tcl 7 Sep 2005 01:35:26 -0000 1.28.2.2 +++ openacs-4/packages/calendar-portlet/www/calendar-portlet.tcl 20 Nov 2006 20:00:15 -0000 1.28.2.3 @@ -24,7 +24,7 @@ {view ""} {page_num ""} {date ""} - {period_days 30} + {period_days:optional} {julian_date ""} } -properties { @@ -38,6 +38,7 @@ } } +set period_days [parameter::get -parameter DefaultPeriodDays -default 30] # get stuff out of the config array array set config $cf Index: openacs-4/packages/curriculum/lib/summary.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/curriculum/lib/summary.adp,v diff -u -N -r1.2 -r1.2.6.1 --- openacs-4/packages/curriculum/lib/summary.adp 11 Dec 2003 21:40:01 -0000 1.2 +++ openacs-4/packages/curriculum/lib/summary.adp 20 Nov 2006 20:00:15 -0000 1.2.6.1 @@ -21,7 +21,7 @@
  • - #curriculum.lt_No_published_curricul# + @community_name@: #curriculum.lt_No_published_curricul#
  • Index: openacs-4/packages/curriculum-portlet/www/curriculum-portlet.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/curriculum-portlet/www/curriculum-portlet.adp,v diff -u -N -r1.2 -r1.2.2.1 --- openacs-4/packages/curriculum-portlet/www/curriculum-portlet.adp 20 Apr 2004 21:13:12 -0000 1.2 +++ openacs-4/packages/curriculum-portlet/www/curriculum-portlet.adp 20 Nov 2006 20:00:15 -0000 1.2.2.1 @@ -13,5 +13,5 @@ -   + #new-portal.when_portlet_shaded# Index: openacs-4/packages/dotlrn/catalog/dotlrn.de_DE.ISO-8859-1.xml =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/catalog/dotlrn.de_DE.ISO-8859-1.xml,v diff -u -N -r1.22.2.11 -r1.22.2.12 --- openacs-4/packages/dotlrn/catalog/dotlrn.de_DE.ISO-8859-1.xml 31 Jul 2006 06:27:14 -0000 1.22.2.11 +++ openacs-4/packages/dotlrn/catalog/dotlrn.de_DE.ISO-8859-1.xml 20 Nov 2006 20:00:15 -0000 1.22.2.12 @@ -1,5 +1,5 @@ - + Eine Kopie von Zugriff @@ -34,6 +34,7 @@ Verwalten Verwalten <img border=0 valign="bottom" src="/resources/dotlrn/admin.gif" alt="Verwalten"> + Administration .LRN-Administration Administrator Administratoren @@ -199,9 +200,11 @@ Von Fuchsie Unbeschr�nkt + voll Unbeschr�nkter Zugriff Allgemeine Informationen Hilfe + Link zu %communities.pretty_name% Systemadministrationsrechte erteilen Grau Gr�n @@ -222,6 +225,7 @@ Kopfzeilenlogo-ID Hilfe .LRN toolbar verstecken + Home HTML Interne ID ID @@ -259,6 +263,7 @@ Wollen Sie diese Benutzer wirklich l�schen? Hinweis: das System wird nur versuchen, diese Benutzer zu entfernen, und es k�nnte Probleme f�r andere Benutzer bekommen. + Sind Sie sicher, dass Sie die nachfolgende Email verschicken wollen? Stellen Sie sicher, dass die Person nicht bereits f�r eine andere E-Mail-Adresse ein Benutzerkonto bei dotLRN besitzt, da doppelte Benutzerkonten Probeme verursachen. Um eine Person mit einem bestehenden Benutzerkonto hinzuzuf�gen, benutzen Sie die Option <a href=members>Teilnehmer verwalten</a>. Kursschl�ssel (eine kurze Bezeichnung ohne Leerzeichen) Web-Adresse der Gruppe @@ -488,6 +493,9 @@ Versenden am E-Mail senden An die ganze Gruppe senden + An die folgenden Mitglieder senden: + An die folgenden Gruppen senden: + Setze f�r alle Benutzer screennames, die noch keinen haben Freigegebene Dateien .LRN Toolbar anzeigen Silber @@ -513,6 +521,7 @@ Administration der Parameter Klein &nbsp; + Rundmail Gruppen-E-Mail... Gruppen-E-Mail senden Gruppen-E-Mail an Benutzer senden @@ -585,7 +594,9 @@ Ja Ja Ja, l�schen + Ja, Mitgliedschaften l�schen Ja, wirklich + Ja, Mitgliedschaften beibehalten Sie k�nnen Farben mit Hilfe von Farbnamen <b>Hinweis:</b> Sie m�ssen <a href="%terms_url%">%terms_pretty_plural%</a> erstellen, um %class_instances_pretty_plural% anlegen zu k�nnen, denn diese m�ssen %terms_pretty_plural%n zugeordnet sein. Ihr Logo ist zu gro�. Die zul�ssige Maximalgr��e f�r Anh�nge betr�gt innerhalb von %system_name% %max_attachments_bytes% Bytes.\n Index: openacs-4/packages/dotlrn/catalog/dotlrn.en_US.ISO-8859-1.xml =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/catalog/dotlrn.en_US.ISO-8859-1.xml,v diff -u -N -r1.43.2.21 -r1.43.2.22 --- openacs-4/packages/dotlrn/catalog/dotlrn.en_US.ISO-8859-1.xml 16 Nov 2006 17:22:36 -0000 1.43.2.21 +++ openacs-4/packages/dotlrn/catalog/dotlrn.en_US.ISO-8859-1.xml 20 Nov 2006 20:00:16 -0000 1.43.2.22 @@ -215,6 +215,7 @@ From fuchsia Full + full Full Access General Information General Site Help @@ -549,6 +550,9 @@ Send Date Send Email Send to everyone in the group + In addition, send to the following people (if you have not selected "Send to Everyone" above): + Send to the following roles: + Set all screenames where no screenname is set Shared Files .LRN Toolbar anzeigen silver @@ -574,6 +578,7 @@ Parameters Administration Small Sorry! + Spam Spam ... Spam Community Spam Users @@ -650,7 +655,9 @@ Yes yes Yes, delete + Yes, delete memberships Yes, I'm sure. + Yes, keep memberships You can specify colors by name <b>Note:</b> You must create <a href="%terms_url%">%terms_pretty_plural%</a> to be able to create %class_instances_pretty_plural%, since these must be associated with %terms_pretty_plural%. Your icon is too large. The publisher of %system_name% has chosen to limit attachments to %max_attachments_bytes% bytes.\n Index: openacs-4/packages/dotlrn/sql/oracle/communities-create.sql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/sql/oracle/communities-create.sql,v diff -u -N -r1.13.8.2 -r1.13.8.3 --- openacs-4/packages/dotlrn/sql/oracle/communities-create.sql 1 Feb 2006 10:15:44 -0000 1.13.8.2 +++ openacs-4/packages/dotlrn/sql/oracle/communities-create.sql 20 Nov 2006 20:00:16 -0000 1.13.8.3 @@ -80,6 +80,7 @@ references apm_packages (package_id), tree_sortkey raw(240), max_child_sortkey raw(3), + max_members integer default '0', site_template_id integer constraint dotlrn_c_site_template_id_fk references dotlrn_site_templates(site_template_id) Index: openacs-4/packages/dotlrn/sql/oracle/upgrade/upgrade-2.2.0d2-2.2.0d3.sql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/sql/oracle/upgrade/upgrade-2.2.0d2-2.2.0d3.sql,v diff -u -N -r1.1.2.3 -r1.1.2.4 --- openacs-4/packages/dotlrn/sql/oracle/upgrade/upgrade-2.2.0d2-2.2.0d3.sql 29 Mar 2006 10:56:14 -0000 1.1.2.3 +++ openacs-4/packages/dotlrn/sql/oracle/upgrade/upgrade-2.2.0d2-2.2.0d3.sql 20 Nov 2006 20:00:16 -0000 1.1.2.4 @@ -26,3 +26,6 @@ end; / +-- Altering dotlrn communities table in order to have a maximum members field +alter table dotlrn_communities_all add column max_members integer; +ALTER TABLE dotlrn_communities_all ALTER COLUMN max_members SET DEFAULT 0; Index: openacs-4/packages/dotlrn/sql/postgresql/communities-create.sql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/sql/postgresql/communities-create.sql,v diff -u -N -r1.4.8.2 -r1.4.8.3 --- openacs-4/packages/dotlrn/sql/postgresql/communities-create.sql 13 Dec 2005 15:32:35 -0000 1.4.8.2 +++ openacs-4/packages/dotlrn/sql/postgresql/communities-create.sql 20 Nov 2006 20:00:16 -0000 1.4.8.3 @@ -92,6 +92,7 @@ default '', tree_sortkey varbit, max_child_sortkey varbit, + max_members integer default 0, site_template_id integer constraint dotlrn_c_site_template_id_fk references dotlrn_site_templates(site_template_id) Index: openacs-4/packages/dotlrn/sql/postgresql/upgrade/upgrade-2.2.0d1-2.2.0d2.sql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/sql/postgresql/upgrade/upgrade-2.2.0d1-2.2.0d2.sql,v diff -u -N -r1.1.2.2 -r1.1.2.3 --- openacs-4/packages/dotlrn/sql/postgresql/upgrade/upgrade-2.2.0d1-2.2.0d2.sql 31 May 2006 02:48:04 -0000 1.1.2.2 +++ openacs-4/packages/dotlrn/sql/postgresql/upgrade/upgrade-2.2.0d1-2.2.0d2.sql 20 Nov 2006 20:00:16 -0000 1.1.2.3 @@ -25,6 +25,9 @@ alter table dotlrn_communities_all add column site_template_id integer; alter table dotlrn_communities_all add constraint dotlrn_c_site_template_id_fk foreign key (site_template_id) references dotlrn_site_templates(site_template_id); +-- Altering dotlrn communities table in order to have a maximum members field +alter table dotlrn_communities_all add column max_members integer; +ALTER TABLE dotlrn_communities_all ALTER COLUMN max_members SET DEFAULT 0; -- Altering Users Profile table and dotlrn users view in order to have -- which site teemplate is going to be using the user Index: openacs-4/packages/dotlrn/tcl/community-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/tcl/community-procs.tcl,v diff -u -N -r1.191.2.30 -r1.191.2.31 --- openacs-4/packages/dotlrn/tcl/community-procs.tcl 4 May 2006 11:45:21 -0000 1.191.2.30 +++ openacs-4/packages/dotlrn/tcl/community-procs.tcl 20 Nov 2006 20:00:16 -0000 1.191.2.31 @@ -738,6 +738,41 @@ return [db_list_of_lists select_users_in_role {}] } + ad_proc -public members_count { + -community_id + {-join_policy "open"} + } { + Count members given the join policy. + } { + return [db_string select_count {}] + } + + ad_proc -public max_members { + -community_id + } { + Returns the max members setting for the community + } { + return [db_string select_max_members {}] + } + + ad_proc -public max_members_p { + -community_id + } { + Have we reached maximum members + } { + set max_members [db_string select_max_members {}] + if {$max_members == 0} { + return 0 + } else { + set size [members_count -community_id $community_id] + if {$size < $max_members} { + return 0 + } else { + return 1 + } + } + } + ad_proc -public member_p { community_id user_id @@ -928,6 +963,18 @@ } } + ad_proc -public remove_banned_users_from_all { + } { + Remove all banned users from all communities (if they are members) + } { + db_foreach get_banned_users_with_membership {} { + dotlrn_community::remove_user_from_all -user_id $user_id + ns_log Debug "User $user_id is banned and was removed from all communities" + } if_no_rows { + ns_log Debug "No banned user needed to be removed from a community" + } + } + ad_proc -public get_all_communities_by_user { user_id } { @@ -1276,7 +1323,12 @@ } elseif {[needs_approval_p -community_id $sc_id]} { append chunk "[_ dotlrn.Request_Membership]\n" } else { - append chunk "([_ dotlrn.Join])\n" + set max_members_p [max_members_p -community_id $sc_id] + if {$max_members_p} { + append chunk "([_ dotlrn.full])\n" + } else { + append chunk "([_ dotlrn.Join])\n" + } } append chunk "\n" Index: openacs-4/packages/dotlrn/tcl/community-procs.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/tcl/community-procs.xql,v diff -u -N -r1.87.2.3 -r1.87.2.4 --- openacs-4/packages/dotlrn/tcl/community-procs.xql 7 Mar 2006 05:39:34 -0000 1.87.2.3 +++ openacs-4/packages/dotlrn/tcl/community-procs.xql 20 Nov 2006 20:00:16 -0000 1.87.2.4 @@ -191,6 +191,13 @@ + + + select count(*) from dotlrn_member_rels_approved where community_id + = :community_id + + + select count(*) @@ -202,6 +209,20 @@ + + + select max_members from dotlrn_communities_all + where community_id = :community_id + + + + + + select max_members from dotlrn_communities_all + where community_id = :community_id + + + select count(*) Index: openacs-4/packages/dotlrn/www/community-member.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/www/community-member.adp,v diff -u -N -r1.22.2.3 -r1.22.2.4 --- openacs-4/packages/dotlrn/www/community-member.adp 20 May 2006 21:52:18 -0000 1.22.2.3 +++ openacs-4/packages/dotlrn/www/community-member.adp 20 Nov 2006 20:00:17 -0000 1.22.2.4 @@ -51,7 +51,7 @@ -

    #dotlrn.Biography# @bio@ +

    #dotlrn.Biography# @bio;noquote@ Index: openacs-4/packages/dotlrn/www/control-panel.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/www/control-panel.adp,v diff -u -N -r1.15.2.10 -r1.15.2.11 --- openacs-4/packages/dotlrn/www/control-panel.adp 31 May 2006 19:08:41 -0000 1.15.2.10 +++ openacs-4/packages/dotlrn/www/control-panel.adp 20 Nov 2006 20:00:17 -0000 1.15.2.11 @@ -27,7 +27,7 @@

    -

    #acs-subsite.My_Account#

    +

    #acs-subsite.My_Account#

    @@ -63,7 +63,7 @@
    -

    #acs-subsite.Your_Portrait#

    +

    #acs-subsite.Your_Portrait#

    @@ -76,7 +76,7 @@

    -

    #acs-subsite.Your_Portrait#

    +

    #acs-subsite.Your_Portrait#

    @@ -96,9 +96,9 @@

    -

    #acs-subsite.Privacy#

    +

    #acs-subsite.Privacy#

    -
    -

    #dotlrn.General_Site_Help#

    +

    #dotlrn.General_Site_Help#

    -
    +
    +
    Index: openacs-4/packages/dotlrn/www/control-panel.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/www/control-panel.xql,v diff -u -N -r1.1.2.1 -r1.1.2.2 --- openacs-4/packages/dotlrn/www/control-panel.xql 24 May 2006 21:44:42 -0000 1.1.2.1 +++ openacs-4/packages/dotlrn/www/control-panel.xql 20 Nov 2006 20:00:17 -0000 1.1.2.2 @@ -9,6 +9,7 @@ and ci.item_id = a.object_id_two and a.object_id_one = :user_id and a.rel_type = 'user_portrait_rel' + limit 1 Index: openacs-4/packages/dotlrn/www/dotlrn-main-portlet.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/www/dotlrn-main-portlet.adp,v diff -u -N -r1.39.2.4 -r1.39.2.5 --- openacs-4/packages/dotlrn/www/dotlrn-main-portlet.adp 16 Nov 2006 17:22:36 -0000 1.39.2.4 +++ openacs-4/packages/dotlrn/www/dotlrn-main-portlet.adp 20 Nov 2006 20:00:17 -0000 1.39.2.5 @@ -27,6 +27,7 @@ + @communities.previous_type_ul_tags;noquote@
    • @@ -62,7 +63,7 @@
    - +
    @final_ul_tags;noquote@ Index: openacs-4/packages/dotlrn/www/dotlrn-master-custom.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/www/dotlrn-master-custom.tcl,v diff -u -N -r1.1.2.3 -r1.1.2.4 --- openacs-4/packages/dotlrn/www/dotlrn-master-custom.tcl 7 Mar 2006 17:38:29 -0000 1.1.2.3 +++ openacs-4/packages/dotlrn/www/dotlrn-master-custom.tcl 20 Nov 2006 20:00:17 -0000 1.1.2.4 @@ -5,7 +5,9 @@ if {![empty_string_p $community_id]} { set dotlrn_master [dotlrn_community::get_dotlrn_master -community_id $community_id] } elseif {$user_id } { - set dotlrn_master [dotlrn::get_dotlrn_master -user_id $user_id] + #unima-nm + #set dotlrn_master [dotlrn::get_dotlrn_master -user_id $user_id] + set dotlrn_master "/packages/dotlrn/www/dotlrn-master" } else { set dotlrn_master [parameter::get -package_id $dotlrn_package_id -parameter "DefaultMaster_p" \ -default "/packages/dotlrn/www/dotlrn-master"] Index: openacs-4/packages/dotlrn/www/one-community-portal-configure-2.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/www/one-community-portal-configure-2.tcl,v diff -u -N -r1.10.2.1 -r1.10.2.2 --- openacs-4/packages/dotlrn/www/one-community-portal-configure-2.tcl 31 May 2005 23:13:06 -0000 1.10.2.1 +++ openacs-4/packages/dotlrn/www/one-community-portal-configure-2.tcl 20 Nov 2006 20:00:17 -0000 1.10.2.2 @@ -31,5 +31,5 @@ portal::configure_dispatch -portal_id $portal_id -form [ns_getform] -ad_returnredirect "one-community-portal-configure?portal_id=$portal_id&referer=$return_url#$anchor" +ad_returnredirect "one-community-portal-configure?portal_id=$portal_id&referer=$return_url" Index: openacs-4/packages/dotlrn/www/one-community.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/www/one-community.adp,v diff -u -N -r1.27 -r1.27.2.1 --- openacs-4/packages/dotlrn/www/one-community.adp 12 Jul 2004 14:49:56 -0000 1.27 +++ openacs-4/packages/dotlrn/www/one-community.adp 20 Nov 2006 20:00:17 -0000 1.27.2.1 @@ -23,6 +23,4 @@

    -@rendered_page;noquote@ - - +@rendered_page;noquote@ \ No newline at end of file Index: openacs-4/packages/dotlrn/www/register.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/www/register.xql,v diff -u -N -r1.2 -r1.2.8.1 --- openacs-4/packages/dotlrn/www/register.xql 4 Dec 2002 09:51:04 -0000 1.2 +++ openacs-4/packages/dotlrn/www/register.xql 20 Nov 2006 20:00:17 -0000 1.2.8.1 @@ -19,4 +19,12 @@ - + + + select max_members + from dotlrn_communities_all + where community_id = :community_id + + + + \ No newline at end of file Index: openacs-4/packages/dotlrn/www/spam-recipients.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/www/spam-recipients.adp,v diff -u -N -r1.6.2.3 -r1.6.2.4 --- openacs-4/packages/dotlrn/www/spam-recipients.adp 9 Nov 2006 16:16:10 -0000 1.6.2.3 +++ openacs-4/packages/dotlrn/www/spam-recipients.adp 20 Nov 2006 20:00:17 -0000 1.6.2.4 @@ -32,12 +32,12 @@ #dotlrn.Send_to_all#

    -Send to the following roles:

    +#dotlrn.Send_to_the_following_roles#

    @rel_types_html;noquote@

    -In addition, send to the following people (if you have not selected "Send to Everyone" above):

    +#dotlrn.Send_to_the_following_members#:

    Index: openacs-4/packages/dotlrn/www/spam-recipients.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/www/spam-recipients.tcl,v diff -u -N -r1.4 -r1.4.2.1 --- openacs-4/packages/dotlrn/www/spam-recipients.tcl 13 Jan 2005 13:57:21 -0000 1.4 +++ openacs-4/packages/dotlrn/www/spam-recipients.tcl 20 Nov 2006 20:00:17 -0000 1.4.2.1 @@ -4,7 +4,7 @@ {referer "control-panel"} } -set spam_name [bulk_mail::parameter -parameter PrettyName -default Spam] +set spam_name [bulk_mail::parameter -parameter PrettyName -default [_ dotlrn.Spam]] set context_bar [list [list $referer [_ dotlrn.Admin]] "$spam_name [_ dotlrn.Community]"] if { ![exists_and_not_null community_id] } { Index: openacs-4/packages/dotlrn/www/subcommunity-archive.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/www/subcommunity-archive.tcl,v diff -u -N -r1.8.8.1 -r1.8.8.2 --- openacs-4/packages/dotlrn/www/subcommunity-archive.tcl 31 May 2005 23:13:06 -0000 1.8.8.1 +++ openacs-4/packages/dotlrn/www/subcommunity-archive.tcl 20 Nov 2006 20:00:17 -0000 1.8.8.2 @@ -39,7 +39,8 @@ form create archive_form # this is lame, but I don't have a better way yet -set yes_label "[_ dotlrn.Yes_Im_sure]" +set yes_label "[_ dotlrn.Yes_keep_members]" +set yes_delete_label "[_ dotlrn.Yes_delete_members]" set no_label "[_ dotlrn.lt_No_I_dont_want_to_arc]" element create archive_form no_button \ @@ -48,11 +49,16 @@ -widget submit \ -value "1" -element create archive_form yes_button \ +element create archive_form yes_keep_button \ -label $yes_label \ -datatype text \ -widget submit +element create archive_form yes_delete_button \ + -label $yes_delete_label \ + -datatype text \ + -widget submit + element create archive_form community_id \ -label " " \ -datatype text \ @@ -66,18 +72,30 @@ -value $referer if {[form is_valid archive_form]} { - form get_values archive_form community_id referer no_button yes_button + form get_values archive_form community_id referer no_button yes_keep_button yes_delete_button - if {[string equal $yes_button $yes_label]} { - + if {[string equal $yes_keep_button $yes_label]} { + #keep all memberships and archive this community db_transaction { set subcomm_id [dotlrn_community::archive \ - -community_id $community_id - ] + -community_id $community_id + ] } } + if {[string equal $yes_delete_button $yes_delete_label]} { + #delete all memberships ... + db_foreach get_list_of_members {} { + dotlrn_community::remove_user $community_id $user_id + } + #... and archive community + db_transaction { + set subcomm_id [dotlrn_community::archive \ + -community_id $community_id + ] + } + + } ad_returnredirect "$referer" ad_script_abort -} - +} Index: openacs-4/packages/dotlrn/www/admin/class.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/www/admin/class.adp,v diff -u -N -r1.32.2.1 -r1.32.2.2 --- openacs-4/packages/dotlrn/www/admin/class.adp 31 May 2005 23:13:07 -0000 1.32.2.1 +++ openacs-4/packages/dotlrn/www/admin/class.adp 20 Nov 2006 20:00:17 -0000 1.32.2.2 @@ -74,13 +74,12 @@

    -

    - Search classes with : - + #dotlrn.Search_classes_with# + #dotlrn.Please_type_a_keyword# - +
    Index: openacs-4/packages/dotlrn/www/admin/classes-chunk.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/www/admin/classes-chunk.adp,v diff -u -N -r1.20.2.1 -r1.20.2.2 --- openacs-4/packages/dotlrn/www/admin/classes-chunk.adp 31 May 2005 23:13:07 -0000 1.20.2.1 +++ openacs-4/packages/dotlrn/www/admin/classes-chunk.adp 20 Nov 2006 20:00:17 -0000 1.20.2.2 @@ -32,11 +32,11 @@
    - Search subjects with : - + #dotlrn.Search_subjects_with# + #dotlrn.Please_type_a_keyword# - +
    Index: openacs-4/packages/dotlrn/www/admin/departments.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/www/admin/departments.adp,v diff -u -N -r1.21.2.1 -r1.21.2.2 --- openacs-4/packages/dotlrn/www/admin/departments.adp 31 May 2005 23:13:07 -0000 1.21.2.1 +++ openacs-4/packages/dotlrn/www/admin/departments.adp 20 Nov 2006 20:00:17 -0000 1.21.2.2 @@ -17,15 +17,15 @@ # %> - + @title@ @context_bar@
    - Search departments with : - - + #dotlrn.Search_departments_with# + #dotlrn.Please_type_a_keyword# +
    Index: openacs-4/packages/dotlrn/www/admin/dotlrn-admins.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/www/admin/dotlrn-admins.tcl,v diff -u -N -r1.5.2.1 -r1.5.2.2 --- openacs-4/packages/dotlrn/www/admin/dotlrn-admins.tcl 31 May 2005 23:13:07 -0000 1.5.2.1 +++ openacs-4/packages/dotlrn/www/admin/dotlrn-admins.tcl 20 Nov 2006 20:00:17 -0000 1.5.2.2 @@ -34,10 +34,10 @@ set admin_id [ad_verify_and_get_user_id] set elements [list user \ - [list label "User" \ + [list label "[_ dotlrn.User]"\ link_url_col user_url ] \ remove \ - [list label "Remove" \ + [list label "[_ dotlrn.Remove]" \ link_url_col remove_url \ display_template {
    } \ sub_class narrow ] \ @@ -50,7 +50,7 @@ -name dotlrn_admins \ -multirow $multirow_name \ -actions $actions \ - -no_data "No dotlrn-admins." \ + -no_data "[_ dotlrn.No_dotlrn-admins]" \ -elements $elements db_multirow \ Index: openacs-4/packages/dotlrn/www/admin/term.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/www/admin/term.adp,v diff -u -N -r1.24.2.1 -r1.24.2.2 --- openacs-4/packages/dotlrn/www/admin/term.adp 31 May 2005 23:13:07 -0000 1.24.2.1 +++ openacs-4/packages/dotlrn/www/admin/term.adp 20 Nov 2006 20:00:17 -0000 1.24.2.2 @@ -79,11 +79,11 @@
    - Search classes with : - + #dotlrn.Search_classes_with# + #dotlrn.Please_type_a_keyword# - +
    Index: openacs-4/packages/dotlrn/www/admin/user.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/www/admin/user.adp,v diff -u -N -r1.29.2.2 -r1.29.2.3 --- openacs-4/packages/dotlrn/www/admin/user.adp 20 Jul 2006 03:47:13 -0000 1.29.2.2 +++ openacs-4/packages/dotlrn/www/admin/user.adp 20 Nov 2006 20:00:17 -0000 1.29.2.3 @@ -47,6 +47,7 @@ @screen_name@ [ #dotlrn.Edit# ] + [ #dotlrn.set_all_screennames_where_null# ] Index: openacs-4/packages/dotlrn-bm/tcl/dotlrn-bm-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-bm/tcl/dotlrn-bm-procs.tcl,v diff -u -N -r1.9 -r1.9.12.1 --- openacs-4/packages/dotlrn-bm/tcl/dotlrn-bm-procs.tcl 9 Aug 2002 18:39:27 -0000 1.9 +++ openacs-4/packages/dotlrn-bm/tcl/dotlrn-bm-procs.tcl 20 Nov 2006 20:00:17 -0000 1.9.12.1 @@ -50,7 +50,7 @@ } { returns the pretty name } { - return "Bulk Mail" + return "#bulk-mail.pretty_name#" } ad_proc -public add_applet { Index: openacs-4/packages/dotlrn-calendar/catalog/dotlrn-calendar.de_DE.ISO-8859-1.xml =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-calendar/catalog/dotlrn-calendar.de_DE.ISO-8859-1.xml,v diff -u -N -r1.9.2.4 -r1.9.2.5 --- openacs-4/packages/dotlrn-calendar/catalog/dotlrn-calendar.de_DE.ISO-8859-1.xml 31 Jul 2006 06:27:14 -0000 1.9.2.4 +++ openacs-4/packages/dotlrn-calendar/catalog/dotlrn-calendar.de_DE.ISO-8859-1.xml 20 Nov 2006 20:00:17 -0000 1.9.2.5 @@ -1,5 +1,5 @@ - + Tagesplan Index: openacs-4/packages/dotlrn-calendar/catalog/dotlrn-calendar.en_US.ISO-8859-1.xml =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-calendar/catalog/dotlrn-calendar.en_US.ISO-8859-1.xml,v diff -u -N -r1.11.2.4 -r1.11.2.5 --- openacs-4/packages/dotlrn-calendar/catalog/dotlrn-calendar.en_US.ISO-8859-1.xml 31 Jul 2006 06:27:14 -0000 1.11.2.4 +++ openacs-4/packages/dotlrn-calendar/catalog/dotlrn-calendar.en_US.ISO-8859-1.xml 20 Nov 2006 20:00:17 -0000 1.11.2.5 @@ -1,5 +1,5 @@ - + Day Summary Index: openacs-4/packages/dotlrn-calendar/tcl/dotlrn-calendar-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-calendar/tcl/dotlrn-calendar-procs.tcl,v diff -u -N -r1.76.2.2 -r1.76.2.3 --- openacs-4/packages/dotlrn-calendar/tcl/dotlrn-calendar-procs.tcl 24 Sep 2005 04:35:27 -0000 1.76.2.2 +++ openacs-4/packages/dotlrn-calendar/tcl/dotlrn-calendar-procs.tcl 20 Nov 2006 20:00:17 -0000 1.76.2.3 @@ -48,7 +48,7 @@ ad_proc -public dotlrn_calendar::get_pretty_name { } { } { - return "Calendar" + return "#calendar-portlet.pretty_name#" } ad_proc -public dotlrn_calendar::add_applet { Index: openacs-4/packages/dotlrn-curriculum/tcl/dotlrn-curriculum-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-curriculum/tcl/dotlrn-curriculum-procs.tcl,v diff -u -N -r1.2 -r1.2.2.1 --- openacs-4/packages/dotlrn-curriculum/tcl/dotlrn-curriculum-procs.tcl 13 Jan 2005 13:57:24 -0000 1.2 +++ openacs-4/packages/dotlrn-curriculum/tcl/dotlrn-curriculum-procs.tcl 20 Nov 2006 20:00:17 -0000 1.2.2.1 @@ -14,7 +14,7 @@ } { get the pretty name } { - return "Curriculum" + return "#curriculum.pretty_name#" } ad_proc -public applet_key {} { Index: openacs-4/packages/dotlrn-dotlrn/catalog/dotlrn-dotlrn.de_DE.ISO-8859-1.xml =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-dotlrn/catalog/dotlrn-dotlrn.de_DE.ISO-8859-1.xml,v diff -u -N -r1.10.2.4 -r1.10.2.5 --- openacs-4/packages/dotlrn-dotlrn/catalog/dotlrn-dotlrn.de_DE.ISO-8859-1.xml 31 Jul 2006 06:27:15 -0000 1.10.2.4 +++ openacs-4/packages/dotlrn-dotlrn/catalog/dotlrn-dotlrn.de_DE.ISO-8859-1.xml 20 Nov 2006 20:00:18 -0000 1.10.2.5 @@ -1,5 +1,5 @@ - + Kernanwendungen von dotLRN Liste der Teilnehmer Index: openacs-4/packages/dotlrn-dotlrn/catalog/dotlrn-dotlrn.en_US.ISO-8859-1.xml =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-dotlrn/catalog/dotlrn-dotlrn.en_US.ISO-8859-1.xml,v diff -u -N -r1.11.2.4 -r1.11.2.5 --- openacs-4/packages/dotlrn-dotlrn/catalog/dotlrn-dotlrn.en_US.ISO-8859-1.xml 31 Jul 2006 06:27:15 -0000 1.11.2.4 +++ openacs-4/packages/dotlrn-dotlrn/catalog/dotlrn-dotlrn.en_US.ISO-8859-1.xml 20 Nov 2006 20:00:18 -0000 1.11.2.5 @@ -1,5 +1,5 @@ - + Core DotLRN Applets Group Members Info Index: openacs-4/packages/dotlrn-edit-this-page/tcl/dotlrn-edit-this-page-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-edit-this-page/tcl/dotlrn-edit-this-page-procs.tcl,v diff -u -N -r1.2 -r1.2.2.1 --- openacs-4/packages/dotlrn-edit-this-page/tcl/dotlrn-edit-this-page-procs.tcl 13 Jan 2005 13:57:26 -0000 1.2 +++ openacs-4/packages/dotlrn-edit-this-page/tcl/dotlrn-edit-this-page-procs.tcl 20 Nov 2006 20:00:18 -0000 1.2.2.1 @@ -29,7 +29,7 @@ } { get the pretty name } { - return "Edit This Page" + return "#edit-this-page.pretty_name#" } ad_proc -public applet_key {} { Index: openacs-4/packages/dotlrn-evaluation/catalog/dotlrn-evaluation.de_DE.ISO-8859-1.xml =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-evaluation/catalog/dotlrn-evaluation.de_DE.ISO-8859-1.xml,v diff -u -N -r1.2.2.1 -r1.2.2.2 --- openacs-4/packages/dotlrn-evaluation/catalog/dotlrn-evaluation.de_DE.ISO-8859-1.xml 31 Jul 2006 06:27:15 -0000 1.2.2.1 +++ openacs-4/packages/dotlrn-evaluation/catalog/dotlrn-evaluation.de_DE.ISO-8859-1.xml 20 Nov 2006 20:00:18 -0000 1.2.2.2 @@ -1,5 +1,5 @@ - + Evaluierung Index: openacs-4/packages/dotlrn-evaluation/catalog/dotlrn-evaluation.en_US.ISO-8859-1.xml =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-evaluation/catalog/dotlrn-evaluation.en_US.ISO-8859-1.xml,v diff -u -N -r1.1.4.1 -r1.1.4.2 --- openacs-4/packages/dotlrn-evaluation/catalog/dotlrn-evaluation.en_US.ISO-8859-1.xml 31 Jul 2006 06:27:15 -0000 1.1.4.1 +++ openacs-4/packages/dotlrn-evaluation/catalog/dotlrn-evaluation.en_US.ISO-8859-1.xml 20 Nov 2006 20:00:18 -0000 1.1.4.2 @@ -1,5 +1,5 @@ - + Evaluation Index: openacs-4/packages/dotlrn-faq/tcl/dotlrn-faq-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-faq/tcl/dotlrn-faq-procs.tcl,v diff -u -N -r1.41 -r1.41.2.1 --- openacs-4/packages/dotlrn-faq/tcl/dotlrn-faq-procs.tcl 13 Jan 2005 13:57:26 -0000 1.41 +++ openacs-4/packages/dotlrn-faq/tcl/dotlrn-faq-procs.tcl 20 Nov 2006 20:00:18 -0000 1.41.2.1 @@ -29,7 +29,7 @@ } { get the pretty name } { - return "Frequently Asked Questions" + return "#faq.pretty_name#" } ad_proc -public applet_key {} { Index: openacs-4/packages/dotlrn-forums/catalog/dotlrn-forums.de_DE.ISO-8859-1.xml =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-forums/catalog/dotlrn-forums.de_DE.ISO-8859-1.xml,v diff -u -N -r1.11.2.2 -r1.11.2.3 --- openacs-4/packages/dotlrn-forums/catalog/dotlrn-forums.de_DE.ISO-8859-1.xml 31 Jul 2006 06:27:15 -0000 1.11.2.2 +++ openacs-4/packages/dotlrn-forums/catalog/dotlrn-forums.de_DE.ISO-8859-1.xml 20 Nov 2006 20:00:18 -0000 1.11.2.3 @@ -1,5 +1,5 @@ - + verwalten Alle Foren Index: openacs-4/packages/dotlrn-forums/catalog/dotlrn-forums.en_US.ISO-8859-1.xml =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-forums/catalog/dotlrn-forums.en_US.ISO-8859-1.xml,v diff -u -N -r1.15.2.2 -r1.15.2.3 --- openacs-4/packages/dotlrn-forums/catalog/dotlrn-forums.en_US.ISO-8859-1.xml 31 Jul 2006 06:27:15 -0000 1.15.2.2 +++ openacs-4/packages/dotlrn-forums/catalog/dotlrn-forums.en_US.ISO-8859-1.xml 20 Nov 2006 20:00:18 -0000 1.15.2.3 @@ -1,5 +1,5 @@ - + administer All forums Index: openacs-4/packages/dotlrn-forums/tcl/dotlrn-forums-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-forums/tcl/dotlrn-forums-procs.tcl,v diff -u -N -r1.12.8.1 -r1.12.8.2 --- openacs-4/packages/dotlrn-forums/tcl/dotlrn-forums-procs.tcl 24 Sep 2005 03:59:34 -0000 1.12.8.1 +++ openacs-4/packages/dotlrn-forums/tcl/dotlrn-forums-procs.tcl 20 Nov 2006 20:00:19 -0000 1.12.8.2 @@ -53,7 +53,7 @@ } { return the pretty name of this applet. } { - return Forums + return "#forums.pretty_name#" } ad_proc -public add_applet { Index: openacs-4/packages/dotlrn-fs/catalog/dotlrn-fs.de_DE.ISO-8859-1.xml =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-fs/catalog/dotlrn-fs.de_DE.ISO-8859-1.xml,v diff -u -N -r1.10.2.6 -r1.10.2.7 --- openacs-4/packages/dotlrn-fs/catalog/dotlrn-fs.de_DE.ISO-8859-1.xml 31 Jul 2006 06:27:16 -0000 1.10.2.6 +++ openacs-4/packages/dotlrn-fs/catalog/dotlrn-fs.de_DE.ISO-8859-1.xml 20 Nov 2006 20:00:19 -0000 1.10.2.7 @@ -1,5 +1,5 @@ - + Alle Alle Inhalte Index: openacs-4/packages/dotlrn-fs/catalog/dotlrn-fs.en_US.ISO-8859-1.xml =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-fs/catalog/dotlrn-fs.en_US.ISO-8859-1.xml,v diff -u -N -r1.13.2.6 -r1.13.2.7 --- openacs-4/packages/dotlrn-fs/catalog/dotlrn-fs.en_US.ISO-8859-1.xml 31 Jul 2006 06:27:16 -0000 1.13.2.6 +++ openacs-4/packages/dotlrn-fs/catalog/dotlrn-fs.en_US.ISO-8859-1.xml 20 Nov 2006 20:00:19 -0000 1.13.2.7 @@ -1,5 +1,5 @@ - + All All items Index: openacs-4/packages/dotlrn-fs/tcl/dotlrn-fs-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-fs/tcl/dotlrn-fs-procs.tcl,v diff -u -N -r1.90.2.6 -r1.90.2.7 --- openacs-4/packages/dotlrn-fs/tcl/dotlrn-fs-procs.tcl 5 Jun 2006 13:03:17 -0000 1.90.2.6 +++ openacs-4/packages/dotlrn-fs/tcl/dotlrn-fs-procs.tcl 20 Nov 2006 20:00:19 -0000 1.90.2.7 @@ -30,7 +30,7 @@ } { What's my key? } { - return dotlrn_fs + return "dotlrn_fs" } ad_proc -public package_key { @@ -51,7 +51,7 @@ } { returns the pretty name } { - return "File Storage" + return "#file-storage.pretty_name#" } ad_proc -public add_applet { Index: openacs-4/packages/dotlrn-homework/catalog/dotlrn-homework.de_DE.ISO-8859-1.xml =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-homework/catalog/dotlrn-homework.de_DE.ISO-8859-1.xml,v diff -u -N -r1.4.2.2 -r1.4.2.3 --- openacs-4/packages/dotlrn-homework/catalog/dotlrn-homework.de_DE.ISO-8859-1.xml 31 Jul 2006 06:27:16 -0000 1.4.2.2 +++ openacs-4/packages/dotlrn-homework/catalog/dotlrn-homework.de_DE.ISO-8859-1.xml 20 Nov 2006 20:00:19 -0000 1.4.2.3 @@ -1,5 +1,5 @@ - + Aktion Warnung Index: openacs-4/packages/dotlrn-homework/catalog/dotlrn-homework.en_US.ISO-8859-1.xml =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-homework/catalog/dotlrn-homework.en_US.ISO-8859-1.xml,v diff -u -N -r1.4.2.2 -r1.4.2.3 --- openacs-4/packages/dotlrn-homework/catalog/dotlrn-homework.en_US.ISO-8859-1.xml 31 Jul 2006 06:27:16 -0000 1.4.2.2 +++ openacs-4/packages/dotlrn-homework/catalog/dotlrn-homework.en_US.ISO-8859-1.xml 20 Nov 2006 20:00:19 -0000 1.4.2.3 @@ -1,5 +1,5 @@ - + Action Alert Index: openacs-4/packages/dotlrn-news/catalog/dotlrn-news.de_DE.ISO-8859-1.xml =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-news/catalog/dotlrn-news.de_DE.ISO-8859-1.xml,v diff -u -N -r1.9.2.2 -r1.9.2.3 --- openacs-4/packages/dotlrn-news/catalog/dotlrn-news.de_DE.ISO-8859-1.xml 31 Jul 2006 06:27:16 -0000 1.9.2.2 +++ openacs-4/packages/dotlrn-news/catalog/dotlrn-news.de_DE.ISO-8859-1.xml 20 Nov 2006 20:00:19 -0000 1.9.2.3 @@ -1,5 +1,5 @@ - + Ank�ndigungen Index: openacs-4/packages/dotlrn-news/catalog/dotlrn-news.en_US.ISO-8859-1.xml =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-news/catalog/dotlrn-news.en_US.ISO-8859-1.xml,v diff -u -N -r1.11.2.2 -r1.11.2.3 --- openacs-4/packages/dotlrn-news/catalog/dotlrn-news.en_US.ISO-8859-1.xml 31 Jul 2006 06:27:16 -0000 1.11.2.2 +++ openacs-4/packages/dotlrn-news/catalog/dotlrn-news.en_US.ISO-8859-1.xml 20 Nov 2006 20:00:19 -0000 1.11.2.3 @@ -1,5 +1,5 @@ - + News Index: openacs-4/packages/dotlrn-news-aggregator/tcl/dotlrn-news-aggregator-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-news-aggregator/tcl/dotlrn-news-aggregator-procs.tcl,v diff -u -N -r1.3 -r1.3.2.1 --- openacs-4/packages/dotlrn-news-aggregator/tcl/dotlrn-news-aggregator-procs.tcl 13 Jan 2005 13:57:31 -0000 1.3 +++ openacs-4/packages/dotlrn-news-aggregator/tcl/dotlrn-news-aggregator-procs.tcl 20 Nov 2006 20:00:20 -0000 1.3.2.1 @@ -28,7 +28,7 @@ ad_proc -public dotlrn_news_aggregator::get_pretty_name {} { returns the pretty name } { - return "News Aggregator" + return "#news-aggregator-portlet.pretty_name#" } ad_proc -public dotlrn_news_aggregator::add_applet {} { @@ -49,7 +49,7 @@ Add the news-aggregator applet to a specifc dotlrn community } { set portal_id [dotlrn_community::get_portal_id -community_id $community_id] - + # create the news-aggregator package instance (all in one, I've mounted it) set package_id [dotlrn::instantiate_and_mount $community_id [package_key]] @@ -66,6 +66,25 @@ ns_set put $args package_id $package_id add_portlet_helper $portal_id $args + #create a aggregator to avoid the "no aggregator"-error + #begin + set package_name [apm_instance_name_from_id [ad_conn package_id]] + set aggregator_name "${package_name} - #news-aggregator.pretty_name#" + set user_id [ad_conn user_id] + set aggregator_id [news_aggregator::aggregator::new \ + -aggregator_name $aggregator_name \ + -package_id $package_id \ + -public_p 0 \ + -creation_user $user_id \ + -creation_ip [ad_conn peeraddr]] + news_aggregator::aggregator::set_user_default -user_id $user_id \ + -package_id $package_id -aggregator_id $aggregator_id + #load preinstalled subscriptions into aggregator + news_aggregator::aggregator::load_preinstalled_subscriptions \ + -aggregator_id $aggregator_id \ + -package_id $package_id + #end + return $package_id } Index: openacs-4/packages/dotlrn-portlet/catalog/dotlrn-portlet.de_DE.ISO-8859-1.xml =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-portlet/catalog/dotlrn-portlet.de_DE.ISO-8859-1.xml,v diff -u -N -r1.10.2.5 -r1.10.2.6 --- openacs-4/packages/dotlrn-portlet/catalog/dotlrn-portlet.de_DE.ISO-8859-1.xml 31 Jul 2006 06:27:17 -0000 1.10.2.5 +++ openacs-4/packages/dotlrn-portlet/catalog/dotlrn-portlet.de_DE.ISO-8859-1.xml 20 Nov 2006 20:00:20 -0000 1.10.2.6 @@ -1,5 +1,5 @@ - + Gruppe verwalten Verwalten @@ -16,6 +16,9 @@ Begr��ungsnachricht editieren E-Mail an Teilnehmer senden Eingeschaltet + Zur %admin_pretty_name% gehen + Zur Administratoren-FAQ gehen + Zur Teilnehmerverwaltung gehen Bei "%pretty_name%" Teilnehmer hinzuf�gen/entfernen k�nnen Gruppen-E-Mails an diese Gruppe senden. Gruppen-E-Mail-Optionen �ndern @@ -45,6 +48,9 @@ Keine %teaching_assistant_role_pretty_plural% vorhanden Nur Administratoren Selbstregistrierung + Gr��e: Sortieren Sortieren/Verwalten + Verhindern, dass Gastnutzern Informationen zu Gruppenmitgliedschaften sehen. + Gastnutzern erlauben Information zu Gruppenmitgliedschaften zu sehen Index: openacs-4/packages/dotlrn-portlet/catalog/dotlrn-portlet.en_US.ISO-8859-1.xml =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-portlet/catalog/dotlrn-portlet.en_US.ISO-8859-1.xml,v diff -u -N -r1.18.2.7 -r1.18.2.8 --- openacs-4/packages/dotlrn-portlet/catalog/dotlrn-portlet.en_US.ISO-8859-1.xml 17 Nov 2006 12:48:09 -0000 1.18.2.7 +++ openacs-4/packages/dotlrn-portlet/catalog/dotlrn-portlet.en_US.ISO-8859-1.xml 20 Nov 2006 20:00:20 -0000 1.18.2.8 @@ -50,6 +50,7 @@ No %teaching_assistant_role_pretty_plural% Only admins Open + Size: Sort Sort/manage Change privacy policy so guest users can not view group membership information. Index: openacs-4/packages/dotlrn-portlet/www/dotlrn-admin-portlet.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-portlet/www/dotlrn-admin-portlet.adp,v diff -u -N -r1.33.2.6 -r1.33.2.7 --- openacs-4/packages/dotlrn-portlet/www/dotlrn-admin-portlet.adp 17 Nov 2006 12:48:09 -0000 1.33.2.6 +++ openacs-4/packages/dotlrn-portlet/www/dotlrn-admin-portlet.adp 20 Nov 2006 20:00:20 -0000 1.33.2.7 @@ -67,6 +67,7 @@
    • #dotlrn-portlet.lt_Customize_Portal_Layo#
    • +
    • #dotlrn-portlet.Size#
    • #dotlrn-portlet.lt_Change_Name_Portlet#
    • #dotlrn.Customize_Template#
    • Index: openacs-4/packages/dotlrn-portlet/www/dotlrn-admin-portlet.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-portlet/www/dotlrn-admin-portlet.tcl,v diff -u -N -r1.16.2.3 -r1.16.2.4 --- openacs-4/packages/dotlrn-portlet/www/dotlrn-admin-portlet.tcl 13 Dec 2005 15:34:41 -0000 1.16.2.3 +++ openacs-4/packages/dotlrn-portlet/www/dotlrn-admin-portlet.tcl 20 Nov 2006 20:00:20 -0000 1.16.2.4 @@ -23,6 +23,8 @@ @author Arjun Sanyal (arjun@openforce.net) @author Ben Adida (ben@openforce) @cvs_id $Id$ +} { + {size:optional} } -properties { } @@ -36,6 +38,18 @@ set admin_pretty_name [ad_parameter -localize dotlrn_admin_pretty_name dotlrn] set subcommunity_p [dotlrn_community::subcommunity_p -community_id $community_id] +set max_members [dotlrn_community::max_members -community_id $community_id] + +if {[exists_and_not_null size]} { + if {$size >= 0} { + db_dml update_max_members {} + set max_members $size + } else { + ad_return_complaint 1 "[_ dotlrn.Invalid_size]" + ad_script_abort + } +} + #The community_type is dotlrn_club for "communties" and the subject name for classes. set comm_type [dotlrn_community::get_community_type_from_community_id $community_id] Index: openacs-4/packages/dotlrn-portlet/www/dotlrn-admin-portlet.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-portlet/www/dotlrn-admin-portlet.xql,v diff -u -N -r1.6.12.1 -r1.6.12.2 --- openacs-4/packages/dotlrn-portlet/www/dotlrn-admin-portlet.xql 21 Jul 2005 22:55:06 -0000 1.6.12.1 +++ openacs-4/packages/dotlrn-portlet/www/dotlrn-admin-portlet.xql 20 Nov 2006 20:00:20 -0000 1.6.12.2 @@ -2,6 +2,14 @@ + + + update dotlrn_communities_all set + max_members = :size + where community_id = :community_id + + + select community_type, @@ -11,7 +19,8 @@ portal_id, non_member_portal_id, admin_portal_id, - archived_p + archived_p, + max_members from dotlrn_communities_all, groups where community_id = :community_id and groups.group_id = community_id Index: openacs-4/packages/dotlrn-portlet/www/dotlrn-members-portlet.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-portlet/www/dotlrn-members-portlet.adp,v diff -u -N -r1.16.2.2 -r1.16.2.3 --- openacs-4/packages/dotlrn-portlet/www/dotlrn-members-portlet.adp 9 Nov 2006 14:17:44 -0000 1.16.2.2 +++ openacs-4/packages/dotlrn-portlet/www/dotlrn-members-portlet.adp 20 Nov 2006 20:00:20 -0000 1.16.2.3 @@ -48,8 +48,8 @@ <%= [acs_community_member_link -user_id $users(user_id) -label "$users(first_names) $users(last_name)"] %> - - @users.email;noquote@ + + @users.email;noquote@ @users.role@ @@ -78,6 +78,5 @@ - <% # The portal is shaded - should not be displayed %> -
      + #new-portal.when_portlet_shaded#
      Index: openacs-4/packages/dotlrn-portlet/www/dotlrn-members-staff-portlet.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-portlet/www/dotlrn-members-staff-portlet.adp,v diff -u -N -r1.17.2.2 -r1.17.2.3 --- openacs-4/packages/dotlrn-portlet/www/dotlrn-members-staff-portlet.adp 16 Nov 2006 13:06:15 -0000 1.17.2.2 +++ openacs-4/packages/dotlrn-portlet/www/dotlrn-members-staff-portlet.adp 20 Nov 2006 20:00:20 -0000 1.17.2.3 @@ -18,7 +18,7 @@ %> - + #dotlrn-portlet.lt_No_community_was_spec# @@ -39,12 +39,9 @@ -
    • #dotlrn-portlet.no_instructor_members#
    • + #dotlrn-portlet.no_instructor_members#
      -
    - -

    - +
    <%= [dotlrn_community::get_role_pretty_plural -community_id $community_id -rel_type dotlrn_ta_rel] %>:

      @@ -58,11 +55,9 @@ -
    +
    -

    - <%= [dotlrn_community::get_role_pretty_plural -community_id $community_id -rel_type dotlrn_ca_rel] %>:

    +
    + + + #new-portal.when_portlet_shaded# + + Index: openacs-4/packages/dotlrn-portlet/www/dotlrn-portlet.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-portlet/www/dotlrn-portlet.adp,v diff -u -N -r1.13 -r1.13.8.1 --- openacs-4/packages/dotlrn-portlet/www/dotlrn-portlet.adp 4 Sep 2003 09:57:22 -0000 1.13 +++ openacs-4/packages/dotlrn-portlet/www/dotlrn-portlet.adp 20 Nov 2006 20:00:20 -0000 1.13.8.1 @@ -41,7 +41,7 @@
    -
    + #new-portal.when_portlet_shaded#
    Index: openacs-4/packages/dotlrn-static/catalog/dotlrn-static.de_DE.ISO-8859-1.xml =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-static/catalog/dotlrn-static.de_DE.ISO-8859-1.xml,v diff -u -N -r1.10.2.2 -r1.10.2.3 --- openacs-4/packages/dotlrn-static/catalog/dotlrn-static.de_DE.ISO-8859-1.xml 31 Jul 2006 06:27:17 -0000 1.10.2.2 +++ openacs-4/packages/dotlrn-static/catalog/dotlrn-static.de_DE.ISO-8859-1.xml 20 Nov 2006 20:00:20 -0000 1.10.2.3 @@ -1,5 +1,5 @@ - + Kurs-Information Community-Information Index: openacs-4/packages/dotlrn-static/catalog/dotlrn-static.en_US.ISO-8859-1.xml =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-static/catalog/dotlrn-static.en_US.ISO-8859-1.xml,v diff -u -N -r1.13.2.2 -r1.13.2.3 --- openacs-4/packages/dotlrn-static/catalog/dotlrn-static.en_US.ISO-8859-1.xml 31 Jul 2006 06:27:17 -0000 1.13.2.2 +++ openacs-4/packages/dotlrn-static/catalog/dotlrn-static.en_US.ISO-8859-1.xml 20 Nov 2006 20:00:20 -0000 1.13.2.3 @@ -1,5 +1,5 @@ - + Class Info Community Info Index: openacs-4/packages/dotlrn-syllabus/catalog/dotlrn-syllabus.de_DE.ISO-8859-1.xml =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-syllabus/catalog/dotlrn-syllabus.de_DE.ISO-8859-1.xml,v diff -u -N -r1.10.2.2 -r1.10.2.3 --- openacs-4/packages/dotlrn-syllabus/catalog/dotlrn-syllabus.de_DE.ISO-8859-1.xml 31 Jul 2006 06:27:17 -0000 1.10.2.2 +++ openacs-4/packages/dotlrn-syllabus/catalog/dotlrn-syllabus.de_DE.ISO-8859-1.xml 20 Nov 2006 20:00:21 -0000 1.10.2.3 @@ -1,5 +1,5 @@ - + Lehrplan verwalten Herunterladen Index: openacs-4/packages/dotlrn-syllabus/catalog/dotlrn-syllabus.en_US.ISO-8859-1.xml =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-syllabus/catalog/dotlrn-syllabus.en_US.ISO-8859-1.xml,v diff -u -N -r1.11.2.2 -r1.11.2.3 --- openacs-4/packages/dotlrn-syllabus/catalog/dotlrn-syllabus.en_US.ISO-8859-1.xml 31 Jul 2006 06:27:17 -0000 1.11.2.2 +++ openacs-4/packages/dotlrn-syllabus/catalog/dotlrn-syllabus.en_US.ISO-8859-1.xml 20 Nov 2006 20:00:22 -0000 1.11.2.3 @@ -1,5 +1,5 @@ - + Syllabus Administration Download Index: openacs-4/packages/dotlrn-syllabus/tcl/dotlrn-syllabus-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-syllabus/tcl/dotlrn-syllabus-procs.tcl,v diff -u -N -r1.10 -r1.10.12.1 --- openacs-4/packages/dotlrn-syllabus/tcl/dotlrn-syllabus-procs.tcl 9 Aug 2002 18:39:30 -0000 1.10 +++ openacs-4/packages/dotlrn-syllabus/tcl/dotlrn-syllabus-procs.tcl 20 Nov 2006 20:00:22 -0000 1.10.12.1 @@ -43,7 +43,7 @@ ad_proc -public get_pretty_name { } { } { - return "Syllabus" + return "#dotlrn-syllabus.pretty_name#" } ad_proc -public add_applet { Index: openacs-4/packages/edit-this-page-portlet/catalog/edit-this-page-portlet.en_US.ISO-8859-1.xml =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/edit-this-page-portlet/catalog/edit-this-page-portlet.en_US.ISO-8859-1.xml,v diff -u -N -r1.2 -r1.2.2.1 --- openacs-4/packages/edit-this-page-portlet/catalog/edit-this-page-portlet.en_US.ISO-8859-1.xml 13 Jan 2005 13:58:05 -0000 1.2 +++ openacs-4/packages/edit-this-page-portlet/catalog/edit-this-page-portlet.en_US.ISO-8859-1.xml 20 Nov 2006 20:00:23 -0000 1.2.2.1 @@ -1,15 +1,15 @@ - + + Administer ETP ETP Administration Disable Disabled Enable + ETP File Storage Group Name - Administer ETP - ETP File Storage + no entry There should be only one instance of ETP for admin purposes ETP - no entry Index: openacs-4/packages/edit-this-page-portlet/www/edit-this-page-portlet.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/edit-this-page-portlet/www/edit-this-page-portlet.adp,v diff -u -N -r1.2 -r1.2.2.1 --- openacs-4/packages/edit-this-page-portlet/www/edit-this-page-portlet.adp 13 Jan 2005 13:58:06 -0000 1.2 +++ openacs-4/packages/edit-this-page-portlet/www/edit-this-page-portlet.adp 20 Nov 2006 20:00:23 -0000 1.2.2.1 @@ -33,9 +33,11 @@ - #edit-this-page-portlet.noentry_edit-this-page# + #edit-this-page-portlet.noentry_edit-this-page# -   + + #new-portal.when_portlet_shaded# + \ No newline at end of file Index: openacs-4/packages/evaluation/catalog/evaluation.de_DE.ISO-8859-1.xml =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/evaluation/catalog/evaluation.de_DE.ISO-8859-1.xml,v diff -u -N -r1.2.4.2 -r1.2.4.3 --- openacs-4/packages/evaluation/catalog/evaluation.de_DE.ISO-8859-1.xml 31 Jul 2006 06:27:18 -0000 1.2.4.2 +++ openacs-4/packages/evaluation/catalog/evaluation.de_DE.ISO-8859-1.xml 20 Nov 2006 20:00:23 -0000 1.2.4.3 @@ -316,7 +316,7 @@ Gewichtung innerhalb der <br /> gesamt zu erreichenden %grade_weight%% <br /> f�r "%grade_plural_name%" Die Gewichtung �bersteigt %grade_weight%% von %grade_plural_name%"} {html {size 5}} {help_text "<#_ Sie k�nnen die Gewichtung �ber %grade_weight%% von %grade_plural_name% angeben. Sie k�nnen aber auch den Nettowert in dem Feld darunter angeben. Gewichtung in den %grade_weight%% von %grade_plural_name% - Die Gewichtung die in $grade_plural_name: ${category_weight}% (of 100% of $grade_plural_name) <br /> $grade_plural_name genutzt wird macht ${grade_weight}% von 100% der gesamten Klassenleistung aus. + Die Gewichtung die in %grade_plural_name%: %category_weight%% (von 100% von %grade_plural_name%) <br /> %grade_plural_name% genutzt wird macht %grade_weight%% von 100% der gesamten Klassenleistung aus. Die Gewichtung die in $grade_plural_name: ${category_weight}% (of 100% of $grade_plural_name) <br /> $grade_plural_name genutzt wird macht ${grade_weight}% von 100% der gesamten Klassenleistung aus. Die Gewichtung die in %grade_plural_name%: %category_weight%% (of 100% of %grade_plural_name%) <br /> %grade_plural_name% genutzt wird macht %grade_weight%% von 100% der gesamten Klassenleistung aus. Soll der Student dazu in der Lage sein, die Benotung einzusehen? (1 = JA, 2 = NEIN) Index: openacs-4/packages/evaluation-portlet/catalog/evaluation-portlet.de_DE.ISO-8859-1.xml =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/evaluation-portlet/catalog/evaluation-portlet.de_DE.ISO-8859-1.xml,v diff -u -N -r1.1.2.2 -r1.1.2.3 --- openacs-4/packages/evaluation-portlet/catalog/evaluation-portlet.de_DE.ISO-8859-1.xml 31 Jul 2006 06:27:18 -0000 1.1.2.2 +++ openacs-4/packages/evaluation-portlet/catalog/evaluation-portlet.de_DE.ISO-8859-1.xml 20 Nov 2006 20:00:23 -0000 1.1.2.3 @@ -1,5 +1,5 @@ - + Hinzuf�gen %grade_name% Antwort hinzuf�gen/ver�ndern @@ -19,7 +19,7 @@ Evaluierung administrieren Gewichtungsverteilung von "%grade_plural_name%" ver�ndern Admin Portlet f�r Bewertungen - Bewertungen administrieren + Evaluierung administrieren Admin Portlet f�r Aufgabenzuweisungen Gruppen administrieren <small>Gesamtpunkte in dieser Kategorie: %total_grade%/%max_grade%<br /> Diese Bewertungskategorie macht %grade_weight%% von 100% der Gesamtklassenleistung aus</small> @@ -36,6 +36,7 @@ Keine Gruppe f�r diese Aufgabe nicht vorhanden nicht bewertet + Portlet-Darstellung Anwort abschicken Antwort nochmal abschicken %task_name% (keine Daten) Index: openacs-4/packages/evaluation-portlet/lib/evaluations-chunk.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/evaluation-portlet/lib/evaluations-chunk.xql,v diff -u -N -r1.3.2.2 -r1.3.2.3 --- openacs-4/packages/evaluation-portlet/lib/evaluations-chunk.xql 4 Oct 2005 18:00:36 -0000 1.3.2.2 +++ openacs-4/packages/evaluation-portlet/lib/evaluations-chunk.xql 20 Nov 2006 20:00:23 -0000 1.3.2.3 @@ -5,7 +5,7 @@ - select upper(grade_plural_name) as grade_plural_name, grade_plural_name as low_name,grade_name,weight as grade_weight,weight as category_weight from evaluation_grades where grade_id = :grade_id + select grade_plural_name as grade_plural_name, grade_plural_name as low_name,grade_name,weight as grade_weight,weight as category_weight from evaluation_grades where grade_id = :grade_id Index: openacs-4/packages/faq/catalog/faq.de_DE.ISO-8859-1.xml =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/faq/catalog/faq.de_DE.ISO-8859-1.xml,v diff -u -N -r1.10.2.2 -r1.10.2.3 --- openacs-4/packages/faq/catalog/faq.de_DE.ISO-8859-1.xml 31 Jul 2006 06:27:18 -0000 1.10.2.2 +++ openacs-4/packages/faq/catalog/faq.de_DE.ISO-8859-1.xml 20 Nov 2006 20:00:24 -0000 1.10.2.3 @@ -6,7 +6,9 @@ Verwalten Alle F&amp;As Antwort + Antwort im HTML-Format Zur�ck zu FAQs + &Auml;nderungen &uuml;bernehmen Konfigurieren Neues FAQ erstellen Neues FAQ erstellen @@ -37,11 +39,13 @@ Eine Frage Einfacher Text Vorformatierter Text + FAQ Vorschau F: F&A auf getrennten Seiten? F&A auf getrennten Seiten? Frage + Frage im HTML-Format Um eins nach unten verschieben Format Titel: Index: openacs-4/packages/faq/catalog/faq.en_US.ISO-8859-1.xml =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/faq/catalog/faq.en_US.ISO-8859-1.xml,v diff -u -N -r1.11.2.4 -r1.11.2.5 --- openacs-4/packages/faq/catalog/faq.en_US.ISO-8859-1.xml 26 Aug 2006 00:14:54 -0000 1.11.2.4 +++ openacs-4/packages/faq/catalog/faq.en_US.ISO-8859-1.xml 20 Nov 2006 20:00:24 -0000 1.11.2.5 @@ -40,6 +40,7 @@ One Question Plain Preformatted + FAQ preview Q: Q&A On Separate Pages? Index: openacs-4/packages/faq/lib/faq-add-edit.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/faq/lib/faq-add-edit.tcl,v diff -u -N -r1.1 -r1.1.6.1 --- openacs-4/packages/faq/lib/faq-add-edit.tcl 22 Dec 2003 23:42:33 -0000 1.1 +++ openacs-4/packages/faq/lib/faq-add-edit.tcl 20 Nov 2006 20:00:24 -0000 1.1.6.1 @@ -5,8 +5,8 @@ ad_form -name faq_add_edit -mode $mode -action "[ad_conn package_url]admin/faq-add-edit" -form { faq_id:key - {faq_name:text(text) {label "FAQ Name"} {html { size 50 }}} - {separate_p:text(select) {label "Each Q&A on separate page"} { options {{No f} {Yes t}} } } + {faq_name:text(text) {label "#faq.Name#"} {html { size 50 }}} + {separate_p:text(select) {label "#faq.QA_on_Separate_Pages#"} { options {{[_ faq.No] f} {[_ faq.Yes] t}} } } } -select_query { select faq_name,separate_p from faqs where faq_id = :faq_id Index: openacs-4/packages/faq/www/admin/configure.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/faq/www/admin/configure.tcl,v diff -u -N -r1.2 -r1.2.2.1 --- openacs-4/packages/faq/www/admin/configure.tcl 12 Aug 2004 14:00:53 -0000 1.2 +++ openacs-4/packages/faq/www/admin/configure.tcl 20 Nov 2006 20:00:24 -0000 1.2.2.1 @@ -18,11 +18,11 @@ ad_form -name categories_mode -form { {cat_enabled_p:text(radio) {label "#faq.Enable_Categories#"} - {options {{Yes 1} {No 0}}} + {options {{[_ faq.Yes] 1} {[_ faq.No] 0}}} {value $use_categories_p}} {wysiwyg_enabled_p:text(radio) {label "#faq.Enable_WYSIWYG#"} - {options {{Yes t} {No f}}} + {options {{[_ faq.Yes] t} {[_ faq.No] f}}} {value $use_wysiwyg_p} } {return_url:text(hidden) {value $return_url}} Index: openacs-4/packages/faq-portlet/catalog/faq-portlet.de_DE.ISO-8859-1.xml =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/faq-portlet/catalog/faq-portlet.de_DE.ISO-8859-1.xml,v diff -u -N -r1.12.2.2 -r1.12.2.3 --- openacs-4/packages/faq-portlet/catalog/faq-portlet.de_DE.ISO-8859-1.xml 31 Jul 2006 06:27:18 -0000 1.12.2.2 +++ openacs-4/packages/faq-portlet/catalog/faq-portlet.de_DE.ISO-8859-1.xml 20 Nov 2006 20:00:24 -0000 1.12.2.3 @@ -1,5 +1,5 @@ - + FAQs verwalten Deaktivieren Index: openacs-4/packages/faq-portlet/www/faq-portlet.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/faq-portlet/www/faq-portlet.adp,v diff -u -N -r1.19.2.1 -r1.19.2.2 --- openacs-4/packages/faq-portlet/www/faq-portlet.adp 16 Nov 2006 17:22:36 -0000 1.19.2.1 +++ openacs-4/packages/faq-portlet/www/faq-portlet.adp 20 Nov 2006 20:00:24 -0000 1.19.2.2 @@ -19,80 +19,23 @@ %> - - - -<% - set new_package_id "" - set old_package_id "" -%> - - - - - - - - - -
      - - - - -<% set new_package_id $faqs(package_id) %> - - -
    - - - -
  • - @faqs.faq_name@ -
  • -
    - - - + + @faq_name@ + - - - - - - - - -<% set old_package_id $new_package_id %> - - - - - - - -
    #faq-portlet.name##dotlrn.clubs_pretty_name#
    @faqs.faq_name@@faqs.parent_name@
    -
    - - - - -
    - - - @faq_name@ - - - - #faq-portlet.no_faqs# - - - + + #faq-portlet.no_faqs# + + + +
    -   + + #new-portal.when_portlet_shaded# + \ No newline at end of file Index: openacs-4/packages/faq-portlet/www/faq-portlet.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/faq-portlet/www/faq-portlet.tcl,v diff -u -N -r1.15 -r1.15.12.1 --- openacs-4/packages/faq-portlet/www/faq-portlet.tcl 9 Aug 2002 18:39:31 -0000 1.15 +++ openacs-4/packages/faq-portlet/www/faq-portlet.tcl 20 Nov 2006 20:00:24 -0000 1.15.12.1 @@ -30,6 +30,19 @@ set list_of_package_ids $config(package_id) set one_instance_p [ad_decode [llength $list_of_package_ids] 1 1 0] +template::list::create -name faqs -multirow faqs -key faq_id -pass_properties { +} -elements { + item { + label "" + display_template { + @faqs.parent_name@
    + + » @faqs.faq_name@
    +
    + } + } +} + db_multirow faqs select_faqs {} if {${faqs:rowcount} == 1} { Index: openacs-4/packages/file-storage/catalog/file-storage.de_DE.ISO-8859-1.xml =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/file-storage/catalog/file-storage.de_DE.ISO-8859-1.xml,v diff -u -N -r1.14.2.5 -r1.14.2.6 --- openacs-4/packages/file-storage/catalog/file-storage.de_DE.ISO-8859-1.xml 30 May 2006 03:57:21 -0000 1.14.2.5 +++ openacs-4/packages/file-storage/catalog/file-storage.de_DE.ISO-8859-1.xml 20 Nov 2006 20:00:24 -0000 1.14.2.6 @@ -1,10 +1,11 @@ - + �nderung Aktion Aktionen: Aktionen + Wenn Sie eine Datei mit demselben Namen hochladen, wird dem Dateinamen zur Unterscheidung ein Suffix angeh�ngt. Bitte beachten Sie, dass es sich hierbei nicht um einen Titel f�r die Datei handelt. Diesen k�nnen Sie beliebig w�hlen. Der Dateiname hingegen mu� immer eindeutig sein. Datei hochladen %pretty_name% hinzuf�gen Autor @@ -52,6 +53,7 @@ Ordner-ID Ordnername: Ordner + Warnung! Eine Ebene nach oben zu %up_name% Element Elemente @@ -134,6 +136,7 @@ URL nicht gefunden PDF Berechtigungen + Dateisystem Eigenschaften Umbenennen Datei umbenennen @@ -165,6 +168,7 @@ Hochgeladen von: %owner% URL: URL gel�scht + Verwenden Sie dieses Formular, um eine ZIP-Datei hochzuladen. Der Inhalt wird in ein Verzeichnis mit obigem Namen oder dem der ZIP-Datei entpackt. Neue Version von "%title%" hochladen "%version_name%" l�schen Dateiname der Version Index: openacs-4/packages/file-storage/catalog/file-storage.en_US.ISO-8859-1.xml =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/file-storage/catalog/file-storage.en_US.ISO-8859-1.xml,v diff -u -N -r1.32.2.12 -r1.32.2.13 --- openacs-4/packages/file-storage/catalog/file-storage.en_US.ISO-8859-1.xml 3 Nov 2006 17:34:02 -0000 1.32.2.12 +++ openacs-4/packages/file-storage/catalog/file-storage.en_US.ISO-8859-1.xml 20 Nov 2006 20:00:25 -0000 1.32.2.13 @@ -7,9 +7,9 @@ Actions If you upload a file with the same name as a file already in this folder, we will alter your new file's name by adding an incremental suffix (eg. &quot;mydoc.doc&quot; -&gt; &quot;mydoc-1.doc&quot;) and making it a new, separate file. <br /><br /><em>Note that this is not the Title of the file, which you can specify as you like. This is the File Name, which must be unique in each folder.</em> Add File - Add Revision Add folder from file system Add %pretty_name% + Add Revision Author Back to folder view Back to project @@ -56,6 +56,7 @@ Folder ID Folder Name: folder + Important! Up to %up_name% item items @@ -144,6 +145,7 @@ No valid destination folder exists PDF Permissions + File-Storage properties Rename Rename File @@ -177,6 +179,7 @@ Uploaded by: %owner% URL: URL deleted + Use this form to upload a ZIP file (its contents will be extracted into a folder with the title you enter above). Upload New Version of %title% Delete %version_name% Version filename Index: openacs-4/packages/file-storage/www/folder-zip-add.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/file-storage/www/folder-zip-add.tcl,v diff -u -N -r1.1.2.3 -r1.1.2.4 --- openacs-4/packages/file-storage/www/folder-zip-add.tcl 20 Jul 2006 04:39:47 -0000 1.1.2.3 +++ openacs-4/packages/file-storage/www/folder-zip-add.tcl 20 Nov 2006 20:00:25 -0000 1.1.2.4 @@ -79,7 +79,7 @@ if {[ad_form_new_p -key file_id]} { ad_form -extend -name file_add -form { - {unpack_message:text(inform) {label "Important!"} {value "Use this form to upload a ZIP file (its contents will be extracted into a folder with the title you enter above)."}} + {unpack_message:text(inform) {label "[_ file-storage.Important]"} {value "[_ file-storage.Use_this_form_to_upload_a_ZIP]"}} } } Index: openacs-4/packages/forums/forums.info =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/forums/forums.info,v diff -u -N -r1.32.2.3 -r1.32.2.4 --- openacs-4/packages/forums/forums.info 10 May 2006 18:50:40 -0000 1.32.2.3 +++ openacs-4/packages/forums/forums.info 20 Nov 2006 20:00:25 -0000 1.32.2.4 @@ -17,8 +17,8 @@ - + @@ -34,6 +34,7 @@ + Index: openacs-4/packages/forums/catalog/forums.de_DE.ISO-8859-1.xml =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/forums/catalog/forums.de_DE.ISO-8859-1.xml,v diff -u -N -r1.12.2.1 -r1.12.2.2 --- openacs-4/packages/forums/catalog/forums.de_DE.ISO-8859-1.xml 30 May 2006 03:57:21 -0000 1.12.2.1 +++ openacs-4/packages/forums/catalog/forums.de_DE.ISO-8859-1.xml 20 Nov 2006 20:00:25 -0000 1.12.2.2 @@ -3,28 +3,35 @@ Forum verwalten Diskussionsforen verwalten + Sie koennen in diesem Forum Ihre Nachricht auch anonym senden. Anonym Freigeben Wollen Sie diesen Beitrag und <strong>alle zugeh�rigen Antworten </strong> wirklich l�schen? Anh�ngen? Anh�nge: Verfasser + Verf�gbare Foren Zur�ck zu %forum.name% <a href="%thread_url%">Zur�ck</a> zu %forum.name% Text nach Datum nach Forum Beschreibung Geschlossen + zuklappen Best�tigen L�schen best�tigen: + Verschieben best�tigen Forumsbeitrag best�tigen: Neues Forum erstellen Neues Forum erstellen L�schen + Direkter Link zu dieser Nachricht Deaktivieren deaktivieren Deaktiviert + Anzeige anpassen: + Zeige vollstaendige Nachrichten Bearbeiten Bearbeiten Erneut bearbeiten @@ -38,8 +45,10 @@ aktivieren aktiviert Gesamter Thread + aufklappen Erster Beitrag Chronologisch geordnet + flach Format Forum Forum: @@ -53,8 +62,11 @@ Weiterleiten Fwd: HTML + In diesem Forum wird anstatt ihres Namens ihr Alias angezeigt: + Zeige nur die Ueberschriften Letzter Beitrag Letzter Beitrag zum Thema + Link zu dieser Nachricht in einem neuen Fenster Eine Kopie des folgenden Beitrags per E-Mail versenden: Erster Beitrag zum Thema Diskussionsforen verwalten @@ -74,13 +86,29 @@ Beitrags-ID Moderieren Moderiert + Verschiebe Nachricht + Verschiebe Nachricht in Forum:: + Verschiebe Nachricht zu Nachricht + Verschiebe Thread + Verschiebe Thread in Forum + Verschiebe Nachricht zu anderer Nachricht + Verschiebe Thread in ein anderes Forum + Verschiebe Thread in anderen Thread + Verschiebe den Thread in den Thread + Verschiebe Thread in den Thread + Verschiebe nach + Verschiebe in einen anderen Thread Name + einger�ckt Neues Forum erstellen Nein Keine Diskussionsforen vorhanden + Zeige Nachrichten nicht eingerueckt Keine Beitr�ge vorhanden Keine Beitr�ge vorhanden Kein Forum vorhanden + Entschuldigung, aber es scheint, dass Sie nicht die benoetigten Rechten besitzen. + am Einzelner Beitrag Einzelner Thread Offen @@ -100,7 +128,10 @@ Verlauf der Beitr�ge f�r Teilnahmeregelung Darstellungsform + Foren Vorschau + drucken + Druckansicht Re: Ablehnen Abgelehnt @@ -112,13 +143,15 @@ Suche Suche: In Foren suchen + Entschuldigen Sie, aber es gibt kein anderes Forum, in welches dieser Thread geschoben werden k�nnte. Betreff Benachrichtigungsfunktion aktivieren? Einfacher Text Dieses Forum ist Strukturiert Diskussionsthemen Ansicht + Zeige Nachrichten eingerueckt Ja Sie k�nnen es Ihr Kommentar Index: openacs-4/packages/forums/catalog/forums.en_US.ISO-8859-1.xml =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/forums/catalog/forums.en_US.ISO-8859-1.xml,v diff -u -N -r1.30.2.3 -r1.30.2.4 --- openacs-4/packages/forums/catalog/forums.en_US.ISO-8859-1.xml 30 May 2006 03:57:21 -0000 1.30.2.3 +++ openacs-4/packages/forums/catalog/forums.en_US.ISO-8859-1.xml 20 Nov 2006 20:00:25 -0000 1.30.2.4 @@ -4,6 +4,7 @@ Administrative options for all forums. Administer Administration + You can post in this forum anonymiously. Anonymous approve Are you sure you want to delete this message and <strong>all replies to it</strong>? @@ -12,6 +13,7 @@ Attach? Attachments: Author + Available Forums Back to %forum.name% <a href="%thread_url%">Back</a> to %forum.name% Body @@ -20,16 +22,20 @@ Charter Charter exceeds maximum length (4000 characters) closed + Collapse Confirm? Confirm Delete: Confirm Move to Confirm Post to Forum: Create a New Forum Create New Forum Delete + Direct link to this post disable disable it disabled + Display as: + Display full posts Edit Edit Edit again @@ -45,8 +51,10 @@ enabled Enter a list of email addresses, optionally with first and last names. They will be subscribed to this forum. As an example: Entire Thread + Expand First Post Flat + Flat Format Forum Forum: @@ -66,8 +74,11 @@ <b>Flat</b> only allows replies at the end of a thread with no nesting or threading, <b>Threaded</b> allows replies to be made to any post in the thread and the reply will be indented under the post they are associated with. HTML If checked, create users that don't exist: + In this forum your screenname is used instead of your realname as follows: + Just display subjects Last Post Last post in subject + Link to this post on a separate page List of users that wrote in the forum: Email a copy of the following message: First post in subject @@ -104,14 +115,18 @@ Name Name Forum Name + Nested New Forum No No Forums + No indentation for replies No Messages No Postings. None + We're sorry, but it appears that you do not have the permission to perform this operation. Number of Posts of forum + on One Message One Thread open @@ -133,7 +148,10 @@ Posting history for Posting Policy Presentation + Forums Preview + Print + Printable view Re: reject Rejected @@ -164,6 +182,7 @@ User Users that wrote in the forum View + With indentation of replies Yes You may Your Note Index: openacs-4/packages/forums/lib/message/messages-table.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/forums/lib/message/messages-table.adp,v diff -u -N -r1.1.6.1 -r1.1.6.2 --- openacs-4/packages/forums/lib/message/messages-table.adp 5 Apr 2006 13:31:46 -0000 1.1.6.1 +++ openacs-4/packages/forums/lib/message/messages-table.adp 20 Nov 2006 20:00:25 -0000 1.1.6.2 @@ -19,7 +19,7 @@ @messages.subject@ - @messages.user_name@ + @messages.screen_name@@messages.user_name@ @messages.posting_date@ Index: openacs-4/packages/forums/lib/message/messages-table.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/forums/lib/message/messages-table.tcl,v diff -u -N -r1.1 -r1.1.6.1 --- openacs-4/packages/forums/lib/message/messages-table.tcl 17 Dec 2003 15:45:29 -0000 1.1 +++ openacs-4/packages/forums/lib/message/messages-table.tcl 20 Nov 2006 20:00:25 -0000 1.1.6.1 @@ -12,6 +12,7 @@ set table_border_color [parameter::get -parameter table_border_color] set table_bgcolor [parameter::get -parameter table_bgcolor] set table_other_bgcolor [parameter::get -parameter table_other_bgcolor] +set useScreenNameP [parameter::get -parameter "UseScreenNameP" -default 0] if {[exists_and_not_null alt_template]} { ad_return_template $alt_template Index: openacs-4/packages/forums/lib/message/post.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/forums/lib/message/post.adp,v diff -u -N -r1.2 -r1.2.2.1 --- openacs-4/packages/forums/lib/message/post.adp 15 Mar 2005 20:06:44 -0000 1.2 +++ openacs-4/packages/forums/lib/message/post.adp 20 Nov 2006 20:00:25 -0000 1.2.2.1 @@ -3,5 +3,6 @@
    - +#forums.in_this_forum_your_screename_is_used# "@screen_name@"
    +#forums.anonymious_posts_are_allowed# Index: openacs-4/packages/forums/lib/message/post.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/forums/lib/message/post.tcl,v diff -u -N -r1.7.2.1 -r1.7.2.2 --- openacs-4/packages/forums/lib/message/post.tcl 24 May 2006 12:13:34 -0000 1.7.2.1 +++ openacs-4/packages/forums/lib/message/post.tcl 20 Nov 2006 20:00:25 -0000 1.7.2.2 @@ -9,6 +9,9 @@ } set user_id [ad_conn user_id] +set screen_name [db_string select_screen_name { select screen_name from users where user_id = :user_id}] +set useScreenNameP [parameter::get -parameter "UseScreenNameP" -default 0] +set pvt_home [ad_pvt_home] if {[array exists parent_message]} { set parent_id $parent_message(message_id) @@ -107,6 +110,7 @@ set message(content) $content set message(user_id) $displayed_user_id set message(user_name) [db_string select_name {}] + set message(screen_name) $screen_name set message(posting_date_ansi) [db_string select_date {}] set message(posting_date_pretty) [lc_time_fmt $message(posting_date_ansi) "%x %X"] @@ -150,7 +154,7 @@ set redirect_message_id $message(root_message_id) } - set redirect_url "[ad_conn package_url]message-view?message_id=[set redirect_message_id]\#$message_id" + set redirect_url "[ad_conn package_url]message-view?message_id=[set redirect_message_id]&\#$message_id" # Wrap the notifications URL if {![empty_string_p $subscribe_p] && $subscribe_p && [empty_string_p $parent_id]} { Index: openacs-4/packages/forums/lib/message/row.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/forums/lib/message/row.adp,v diff -u -N -r1.10 -r1.10.2.1 --- openacs-4/packages/forums/lib/message/row.adp 8 Apr 2005 08:28:08 -0000 1.10 +++ openacs-4/packages/forums/lib/message/row.adp 20 Nov 2006 20:00:25 -0000 1.10.2.1 @@ -34,22 +34,27 @@
    - @message.number@: - @message.subject@ + @message.number@: + @message.subject@
    @message.subject@ -
    @message.number@ + -
    #forums.Posted_by# @message.user_name@ on
    +
    + #forums.Posted_by# + @message.screen_name@ + @message.user_name@ #forums.on#
    +
    @message.content;noquote@ Index: openacs-4/packages/forums/lib/message/row.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/forums/lib/message/row.tcl,v diff -u -N -r1.5 -r1.5.2.1 --- openacs-4/packages/forums/lib/message/row.tcl 15 Mar 2005 20:06:45 -0000 1.5 +++ openacs-4/packages/forums/lib/message/row.tcl 20 Nov 2006 20:00:25 -0000 1.5.2.1 @@ -10,6 +10,7 @@ } set viewer_id [ad_conn user_id] +set useScreenNameP [parameter::get -parameter "UseScreenNameP" -default 0] if {![exists_and_not_null rownum]} { set rownum 1 Index: openacs-4/packages/forums/lib/message/thread-chunk-postgresql.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/forums/lib/message/thread-chunk-postgresql.xql,v diff -u -N -r1.5 -r1.5.2.1 --- openacs-4/packages/forums/lib/message/thread-chunk-postgresql.xql 15 Mar 2005 20:06:45 -0000 1.5 +++ openacs-4/packages/forums/lib/message/thread-chunk-postgresql.xql 20 Nov 2006 20:00:25 -0000 1.5.2.1 @@ -18,42 +18,46 @@ select message_id, 0 as n_attachments, - subject, - content, - format, - person__name(user_id) as user_name, - to_char(posting_date, 'YYYY-MM-DD HH24:MI:SS') as posting_date_ansi, - tree_level(tree_sortkey) as tree_level, - state, - user_id, - parent_id, - open_p, - max_child_sortkey - from $table_name - where forum_id = :forum_id - and tree_sortkey between tree_left(:tree_sortkey) and tree_right(:tree_sortkey) + t.subject, + t.content, + t.format, + person__name(t.user_id) as user_name, + to_char(t.posting_date, 'YYYY-MM-DD HH24:MI:SS') as posting_date_ansi, + tree_level(t.tree_sortkey) as tree_level, + t.state, + t.user_id, + t.parent_id, + t.open_p, + t.max_child_sortkey, + u.screen_name + from $table_name t, users u + where t.forum_id = :forum_id + and u.user_id = t.user_id + and t.tree_sortkey between tree_left(:tree_sortkey) and tree_right(:tree_sortkey) order by $order_by select message_id, - (select count(*) from attachments where object_id = message_id) as n_attachments, - subject, - content, - format, - person__name(user_id) as user_name, - to_char(posting_date, 'YYYY-MM-DD HH24:MI:SS') as posting_date_ansi, - tree_level(tree_sortkey) as tree_level, - state, - user_id, - parent_id, - open_p, - max_child_sortkey - from $table_name - where forum_id = :forum_id - and tree_sortkey between tree_left(:tree_sortkey) and tree_right(:tree_sortkey) + (select count(*) from attachments where object_id = t.message_id) as n_attachments, + t.subject, + t.content, + t.format, + person__name(t.user_id) as user_name, + to_char(t.posting_date, 'YYYY-MM-DD HH24:MI:SS') as posting_date_ansi, + tree_level(t.tree_sortkey) as tree_level, + t.state, + t.user_id, + t.parent_id, + t.open_p, + t.max_child_sortkey, + u.screen_name + from $table_name t, users u + where t.forum_id = :forum_id + and u.user_id = t.user_id + and t.tree_sortkey between tree_left(:tree_sortkey) and tree_right(:tree_sortkey) order by $order_by Index: openacs-4/packages/forums/lib/message/thread-chunk.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/forums/lib/message/thread-chunk.tcl,v diff -u -N -r1.5 -r1.5.2.1 --- openacs-4/packages/forums/lib/message/thread-chunk.tcl 28 Jan 2005 11:16:39 -0000 1.5 +++ openacs-4/packages/forums/lib/message/thread-chunk.tcl 20 Nov 2006 20:00:25 -0000 1.5.2.1 @@ -78,7 +78,7 @@ # More Tcl vars (we might as well use them - Ben) if { [string equal $forum(presentation_type) flat] } { - set order_by "$table_name.posting_date, tree_sortkey" + set order_by "t.posting_date, tree_sortkey" } else { set order_by "tree_sortkey" } Index: openacs-4/packages/forums/lib/message/threads-chunk-postgresql.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/forums/lib/message/Attic/threads-chunk-postgresql.xql,v diff -u -N -r1.3 -r1.3.2.1 --- openacs-4/packages/forums/lib/message/threads-chunk-postgresql.xql 15 Mar 2005 20:06:45 -0000 1.3 +++ openacs-4/packages/forums/lib/message/threads-chunk-postgresql.xql 20 Nov 2006 20:00:25 -0000 1.3.2.1 @@ -26,9 +26,12 @@ fm.state, $replies as n_messages, to_char(fm.last_child_post, 'YYYY-MM-DD HH24:MI:SS') as last_child_post_ansi, - case when fm.last_child_post > (now() - interval '1 day') then 't' else 'f' end as new_p - from forums_messages_approved fm + case when fm.last_child_post > (now() - interval '1 day') then 't' else 'f' end as new_p, + u.screen_name + from forums_messages_approved fm, + users u where fm.forum_id = :forum_id + and fm.user_id = u.user_id and fm.parent_id is null [template::list::page_where_clause -and -name messages -key fm.message_id] [template::list::orderby_clause -orderby -name messages] Index: openacs-4/packages/forums/lib/message/threads-chunk.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/forums/lib/message/threads-chunk.tcl,v diff -u -N -r1.3.2.3 -r1.3.2.4 --- openacs-4/packages/forums/lib/message/threads-chunk.tcl 24 May 2006 11:56:18 -0000 1.3.2.3 +++ openacs-4/packages/forums/lib/message/threads-chunk.tcl 20 Nov 2006 20:00:25 -0000 1.3.2.4 @@ -110,6 +110,8 @@ forum_id {} } +set useScreenNameP [parameter::get -parameter "UseScreenNameP" -default 0] + db_multirow -extend { last_child_post_pretty posting_date_pretty @@ -125,7 +127,12 @@ set posting_date_pretty [lc_time_fmt $posting_date_ansi "%x %X"] set message_url [export_vars -base "${base_url}message-view" { message_id }] - set user_url [export_vars -base "${base_url}user-history" { user_id }] + if { $useScreenNameP } { + set user_name $screen_name + set user_url "" + } else { + set user_url [export_vars -base "${base_url}user-history" { user_id }] + } set n_messages_pretty [lc_numeric $n_messages] switch $state { Index: openacs-4/packages/forums/lib/search/search-chunk.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/forums/lib/search/search-chunk.tcl,v diff -u -N -r1.2.2.1 -r1.2.2.2 --- openacs-4/packages/forums/lib/search/search-chunk.tcl 5 Apr 2006 13:31:46 -0000 1.2.2.1 +++ openacs-4/packages/forums/lib/search/search-chunk.tcl 20 Nov 2006 20:00:25 -0000 1.2.2.2 @@ -6,6 +6,7 @@ } set package_id [ad_conn package_id] +set useScreenNameP [parameter::get -parameter "UseScreenNameP" -default 0] set searchbox_p [parameter::get -parameter ForumsSearchBoxP -package_id $package_id -default 1] if {$searchbox_p} { @@ -27,11 +28,18 @@ if { [parameter::get -parameter UseIntermediaForSearchP -default 0] } { append query "_intermedia" } - - db_multirow messages $query {} { - set posting_date [lc_time_fmt $posting_date_ansi "%x %X"] - } - + + if { $useScreenNameP == 1 } { + db_multirow -extend { screen_name } messages $query {} { + set posting_date_pretty [lc_time_fmt $posting_date_ansi "%x %X"] + set screen_name [db_string select_screen_name {select screen_name from users where user_id = :user_id}] + } + } else { + db_multirow messages $query {} { + set posting_date_pretty [lc_time_fmt $posting_date_ansi "%x %X"] + } + } + } else { set messages:rowcount 0 } Index: openacs-4/packages/forums/tcl/forums-email-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/forums/tcl/forums-email-procs.tcl,v diff -u -N -r1.3 -r1.3.2.1 --- openacs-4/packages/forums/tcl/forums-email-procs.tcl 12 Jul 2004 14:49:59 -0000 1.3 +++ openacs-4/packages/forums/tcl/forums-email-procs.tcl 20 Nov 2006 20:00:25 -0000 1.3.2.1 @@ -21,7 +21,12 @@ # Variables for I18N message lookup: set posting_date $message(posting_date_ansi) - set user_name $message(user_name) + set useScreenNameP [parameter::get -parameter "UseScreenNameP" -default 0] + if {$useScreenNameP != 0} { + set user_name $message(screen_name) + } else { + set user_name $message(user_name) + } # Set up the message body set new_body "[ad_html_to_text -- $pre_body]" Index: openacs-4/packages/forums/tcl/messages-procs-postgresql.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/forums/tcl/messages-procs-postgresql.xql,v diff -u -N -r1.9 -r1.9.2.1 --- openacs-4/packages/forums/tcl/messages-procs-postgresql.xql 27 Jan 2005 16:08:31 -0000 1.9 +++ openacs-4/packages/forums/tcl/messages-procs-postgresql.xql 20 Nov 2006 20:00:25 -0000 1.9.2.1 @@ -11,12 +11,14 @@ party__email(forums_messages.user_id) as user_email, forums_forum__name(forums_messages.forum_id) as forum_name, forums_message__root_message_id(forums_messages.message_id) as root_message_id, + users.screen_name, (select fm2.subject from forums_messages fm2 where fm2.message_id = forums_message__root_message_id(forums_messages.message_id)) as root_subject, to_char(forums_messages.posting_date, 'YYYY-MM-DD HH24:MI:SS') as posting_date_ansi - from forums_messages + from forums_messages, users where forums_messages.message_id= :message_id + and forums_messages.user_id = users.user_id @@ -28,12 +30,14 @@ party__email(forums_messages.user_id) as user_email, forums_forum__name(forums_messages.forum_id) as forum_name, forums_message__root_message_id(forums_messages.message_id) as root_message_id, + users.screen_name, (select fm2.subject from forums_messages fm2 where fm2.message_id = forums_message__root_message_id(forums_messages.message_id)) as root_subject, to_char(forums_messages.posting_date, 'YYYY-MM-DD HH24:MI:SS') as posting_date_ansi - from forums_messages + from forums_messages, users where forums_messages.message_id= :message_id + and forums_messages.user_id = users.user_id Index: openacs-4/packages/forums/tcl/messages-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/forums/tcl/messages-procs.tcl,v diff -u -N -r1.31.2.1 -r1.31.2.2 --- openacs-4/packages/forums/tcl/messages-procs.tcl 25 May 2006 02:49:11 -0000 1.31.2.1 +++ openacs-4/packages/forums/tcl/messages-procs.tcl 20 Nov 2006 20:00:25 -0000 1.31.2.2 @@ -44,7 +44,7 @@ get -message_id $message_id -array message if {[info exists message(state)] && [string equal $message(state) approved]} { - do_notifications -message_id $message_id + do_notifications -message_id $message_id -user_id $user_id } } on_error { @@ -73,13 +73,24 @@ ad_proc -public forum::message::do_notifications { {-message_id:required} + {-user_id ""} } { # Select all the important information forum::message::get -message_id $message_id -array message set forum_id $message(forum_id) set url "[ad_url][db_string select_forums_package_url {}]" + set useScreenNameP [parameter::get -parameter "UseScreenNameP" -default 0] + if {($useScreenNameP == 0) && ($user_id != 0)} { + if {[empty_string_p $user_id]} { + set user_id [ad_conn user_id] + } + } else { + set user_id [party::get_by_email -email [ad_parameter -package_id [ad_acs_kernel_id] HostAdministrator]] + } + set notif_user $user_id + set attachments [attachments::get_attachments -object_id $message(message_id)] set message_text [ad_html_text_convert -from $message(format) -to text/plain -- $message(content)] @@ -88,7 +99,11 @@ set html_version "" append html_version "Forum: $message(forum_name)
    \n" append html_version "Thread: $message(root_subject)
    \n" - append html_version "Author: $message(user_name)
    \n" + if {$useScreenNameP == 0} { + append html_version "Author: $message(user_name)
    \n" + } else { + append html_version "Author: $message(screen_name)
    \n" + } append html_version "Posted: $message(posting_date)
    " append html_version "\n
    \n" append html_version $message_html @@ -111,8 +126,13 @@ set text_version "" append text_version " Forum: $message(forum_name) -Thread: $message(root_message_id) -Author: $message(user_name) +Thread: $message(root_message_id)\n" + if {$useScreenNameP == 0} { + append text_version "Author: $message(user_name)" + } else { + append text_version "Author: $message(screen_name)" + } + append text_version " Posted: $message(posting_date) ---------------------------------- $message_text Index: openacs-4/packages/forums/www/message-view.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/forums/www/message-view.adp,v diff -u -N -r1.28.2.4 -r1.28.2.5 --- openacs-4/packages/forums/www/message-view.adp 3 Nov 2006 22:56:04 -0000 1.28.2.4 +++ openacs-4/packages/forums/www/message-view.adp 20 Nov 2006 20:00:26 -0000 1.28.2.5 @@ -28,11 +28,11 @@