Index: openacs-4/packages/dotlrn/sql/oracle/dotlrn-init.sql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/sql/oracle/dotlrn-init.sql,v diff -u -N -r1.12 -r1.13 --- openacs-4/packages/dotlrn/sql/oracle/dotlrn-init.sql 8 Feb 2002 20:50:56 -0000 1.12 +++ openacs-4/packages/dotlrn/sql/oracle/dotlrn-init.sql 19 Feb 2002 19:34:45 -0000 1.13 @@ -44,7 +44,7 @@ -- create roles acs_rel_type.create_role ('student', 'Student', 'Students'); acs_rel_type.create_role ('teaching_assistant', 'Teaching Assistant', 'Teaching Assistants'); - acs_rel_type.create_role ('instructor', 'Instructor', 'Instructors'); + acs_rel_type.create_role ('instructor', 'Professor', 'Professors'); acs_rel_type.create_role ('admin', 'Administrator', 'Administrators'); end; / Index: openacs-4/packages/dotlrn/tcl/class-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/tcl/class-procs.tcl,v diff -u -N -r1.21 -r1.22 --- openacs-4/packages/dotlrn/tcl/class-procs.tcl 22 Jan 2002 00:13:09 -0000 1.21 +++ openacs-4/packages/dotlrn/tcl/class-procs.tcl 19 Feb 2002 19:34:45 -0000 1.22 @@ -134,7 +134,7 @@ Returns the available roles } { return { - {instructor_rel "Instructor"} + {instructor_rel "Professor"} {ta_rel "Teaching Assistant"} {student_rel "Student"} {admin_rel "Administrator"} Index: openacs-4/packages/dotlrn/tcl/dotlrn-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/tcl/dotlrn-procs.tcl,v diff -u -N -r1.35 -r1.36 --- openacs-4/packages/dotlrn/tcl/dotlrn-procs.tcl 8 Feb 2002 20:50:57 -0000 1.35 +++ openacs-4/packages/dotlrn/tcl/dotlrn-procs.tcl 19 Feb 2002 19:34:45 -0000 1.36 @@ -116,7 +116,7 @@ set package_list [nsv_array get site_nodes "*$package_key*"] set dotlrn_ancestor_p 0 - # ns_log notice "is_package_mounted: pakage_list is $package_list" + # ns_log notice "is_package_mounted: package_list is $package_list" for {set x 1} {$x < [llength $package_list]} {incr x 2} { array set package_info [lindex $package_list $x] @@ -130,6 +130,7 @@ break } } + return $dotlrn_ancestor_p } Index: openacs-4/packages/dotlrn/www/admin/add-instructor-2.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/www/admin/add-instructor-2.tcl,v diff -u -N -r1.2 -r1.3 --- openacs-4/packages/dotlrn/www/admin/add-instructor-2.tcl 10 Jan 2002 23:42:45 -0000 1.2 +++ openacs-4/packages/dotlrn/www/admin/add-instructor-2.tcl 19 Feb 2002 19:34:45 -0000 1.3 @@ -12,7 +12,7 @@ users:multirow } -set context_bar {{Add an Instructor}} +set context_bar {{Add a Professor}} db_multirow users select_users {} Index: openacs-4/packages/dotlrn/www/admin/add-instructor.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/www/admin/add-instructor.adp,v diff -u -N -r1.2 -r1.3 --- openacs-4/packages/dotlrn/www/admin/add-instructor.adp 20 Jan 2002 19:43:46 -0000 1.2 +++ openacs-4/packages/dotlrn/www/admin/add-instructor.adp 19 Feb 2002 19:34:45 -0000 1.3 @@ -2,10 +2,10 @@ dotLRN Admin @context_bar@ -

Add an Instructor

+

Add a Professor

- Add an Instructor: + Add a Professor:
Index: openacs-4/packages/dotlrn/www/admin/add-instructor.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/www/admin/add-instructor.tcl,v diff -u -N -r1.3 -r1.4 --- openacs-4/packages/dotlrn/www/admin/add-instructor.tcl 20 Jan 2002 19:43:46 -0000 1.3 +++ openacs-4/packages/dotlrn/www/admin/add-instructor.tcl 19 Feb 2002 19:34:45 -0000 1.4 @@ -9,6 +9,6 @@ {referer "./"} } -set context_bar {{Add an Instructor}} +set context_bar {{Add a Professor}} ad_return_template Index: openacs-4/packages/dotlrn/www/admin/class-instance-new.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/www/admin/class-instance-new.tcl,v diff -u -N -r1.12 -r1.13 --- openacs-4/packages/dotlrn/www/admin/class-instance-new.tcl 11 Feb 2002 19:18:43 -0000 1.12 +++ openacs-4/packages/dotlrn/www/admin/class-instance-new.tcl 19 Feb 2002 19:34:45 -0000 1.13 @@ -44,7 +44,7 @@ -value $class_key element create add_class_instance add_instructor \ - -label "Add Instructor" \ + -label "Add Professor" \ -datatype text \ -widget radio \ -options {{Yes 1} {No 0}} \