Index: openacs-4/packages/dotlrn-catalog/catalog/dotlrn-catalog.en_US.ISO-8859-1.xml =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-catalog/catalog/dotlrn-catalog.en_US.ISO-8859-1.xml,v diff -u -r1.3 -r1.4 --- openacs-4/packages/dotlrn-catalog/catalog/dotlrn-catalog.en_US.ISO-8859-1.xml 16 Feb 2005 00:39:09 -0000 1.3 +++ openacs-4/packages/dotlrn-catalog/catalog/dotlrn-catalog.en_US.ISO-8859-1.xml 16 Feb 2005 15:28:32 -0000 1.4 @@ -21,6 +21,7 @@ Confirm Delete Of Course Administration DotLRN Catalog Index + Course Details Description: Course Key: Your Course List @@ -51,7 +52,7 @@ and has <b>No</b> associations to dotLRN class or community has one association to dotLRN class or community Course Information - is associated to: + is associated with: Check/uncheck all rows Make This Course Live Manage Permissions @@ -88,6 +89,5 @@ Version Versions Watch - Watch Association Yes Index: openacs-4/packages/dotlrn-catalog/catalog/dotlrn-catalog.es_ES.ISO-8859-1.xml =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-catalog/catalog/dotlrn-catalog.es_ES.ISO-8859-1.xml,v diff -u -r1.1 -r1.2 --- openacs-4/packages/dotlrn-catalog/catalog/dotlrn-catalog.es_ES.ISO-8859-1.xml 16 Feb 2005 00:22:46 -0000 1.1 +++ openacs-4/packages/dotlrn-catalog/catalog/dotlrn-catalog.es_ES.ISO-8859-1.xml 16 Feb 2005 15:28:32 -0000 1.2 @@ -21,6 +21,7 @@ Corfirmar borrado de Administracion de Cursos Indice del Catalogo dotLRN + Detalles del Curso Informacion del Curso: Llave del Curso: Su listado de Cursos @@ -34,6 +35,7 @@ Descripcion Aun quiere borrarlo? dotLRN + Asociaciones con dotLRN Clases de dotLRN Comunidades de dotLRN Listado de dotLRN @@ -49,6 +51,7 @@ Otorgar/Remover y <b>No</b> posee asociaciones a clases o comunidades de dotLRN posee una asociacion a una clase o comunidad de dotLRN + Informacion del curso esta asociado a: Marcar/Desmarcar todas las filas Hacer este Curso Disponible @@ -86,8 +89,5 @@ Version Versiones Observar - Observar Asociaciones Si - - Index: openacs-4/packages/dotlrn-catalog/lib/course-chunk.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-catalog/lib/course-chunk.adp,v diff -u -r1.3 -r1.4 --- openacs-4/packages/dotlrn-catalog/lib/course-chunk.adp 16 Feb 2005 00:22:12 -0000 1.3 +++ openacs-4/packages/dotlrn-catalog/lib/course-chunk.adp 16 Feb 2005 15:28:32 -0000 1.4 @@ -38,10 +38,10 @@ - #dotlrn-catalog.yes# (#dotlrn-catalog.watch#) + #dotlrn-catalog.yes# (#dotlrn-catalog.watch#) - #dotlrn-catalog.yes# (#dotlrn-catalog.watch#) + #dotlrn-catalog.yes# (#dotlrn-catalog.watch#) Index: openacs-4/packages/dotlrn-catalog/www/dt-admin/course-add-edit.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-catalog/www/dt-admin/course-add-edit.tcl,v diff -u -r1.3 -r1.4 --- openacs-4/packages/dotlrn-catalog/www/dt-admin/course-add-edit.tcl 16 Feb 2005 00:44:25 -0000 1.3 +++ openacs-4/packages/dotlrn-catalog/www/dt-admin/course-add-edit.tcl 16 Feb 2005 15:28:32 -0000 1.4 @@ -106,8 +106,8 @@ } if { [catch { set item_id [content::item::new -name $course_key -parent_id $folder_id \ -content_type "dotlrn_catalog" -creation_user $user_id \ - -attributes $form_attributes -is_live t] } errmsg] } { - ad_return_complaint 1 "\#dotlrn-catalog.name_already\# $errmsg" + -attributes $form_attributes -is_live t -title $course_key] } errmsg] } { + ad_return_complaint 1 "\#dotlrn-catalog.name_already\#" } # Grant admin privileges to the user over the item in the CR permission::grant -party_id $user_id -object_id $item_id -privilege "admin" Index: openacs-4/packages/dotlrn-catalog/www/dt-admin/course-details.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-catalog/www/dt-admin/course-details.adp,v diff -u --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/dotlrn-catalog/www/dt-admin/course-details.adp 16 Feb 2005 15:28:32 -0000 1.1 @@ -0,0 +1,16 @@ + +@page_title@ +@context;noquote@ + + +

@course_key;noquote@ (@course_name@) #dotlrn-catalog.is_assoc#

+ + + + + + + + + + Index: openacs-4/packages/dotlrn-catalog/www/dt-admin/course-details.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-catalog/www/dt-admin/course-details.tcl,v diff -u --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/dotlrn-catalog/www/dt-admin/course-details.tcl 16 Feb 2005 15:28:32 -0000 1.1 @@ -0,0 +1,23 @@ +ad_page_contract { + Shows all associations that course_id has + @author Miguel Marin (miguelmarin@viaro.net) + @author Viaro Networks www.viaro.net + @creation date 28-01-2005 +} { + { return_url "" } + course_id:notnull + course_key:notnull + { course_name "" } +} + +if { [string equal $return_url "index"] } { + set context [list [list ../course-info?course_id=$course_id&course_key=$course_key&course_name=$course_name "[_ dotlrn-catalog.one_course_info]"] "[_ dotlrn-catalog.course_details]"] +} else { + set context [list [list course-list "[_ dotlrn-catalog.course_list]"] "[_ dotlrn-catalog.course_details]"] +} + +set page_title "[_ dotlrn-catalog.course_details]" +set user_id [ad_conn user_id] + +db_multirow relations relation { } + Index: openacs-4/packages/dotlrn-catalog/www/dt-admin/course-details.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-catalog/www/dt-admin/course-details.xql,v diff -u --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/dotlrn-catalog/www/dt-admin/course-details.xql 16 Feb 2005 15:28:32 -0000 1.1 @@ -0,0 +1,19 @@ + + + + + + select department_name, term_name, class_name, pretty_name, description, url + from dotlrn_class_instances_full + where class_instance_id = :class_id + + + + + + select object_id_two as object_id, rel_type as type from acs_rels + where object_id_one = :course_id order by type + + + + \ No newline at end of file Index: openacs-4/packages/dotlrn-catalog/www/dt-admin/course-list.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-catalog/www/dt-admin/course-list.tcl,v diff -u -r1.2 -r1.3 --- openacs-4/packages/dotlrn-catalog/www/dt-admin/course-list.tcl 16 Feb 2005 00:22:12 -0000 1.2 +++ openacs-4/packages/dotlrn-catalog/www/dt-admin/course-list.tcl 16 Feb 2005 15:28:32 -0000 1.3 @@ -81,7 +81,7 @@ #dotlrn-catalog.no# (#dotlrn-catalog.associate#) - #dotlrn-catalog.yes# (#dotlrn-catalog.watch#) + #dotlrn-catalog.yes# (#dotlrn-catalog.watch#) } }