Index: openacs-4/packages/assessment/lib/session-items.adp
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/assessment/lib/session-items.adp,v
diff -u -r1.12.2.2 -r1.12.2.3
--- openacs-4/packages/assessment/lib/session-items.adp	5 Feb 2007 14:10:42 -0000	1.12.2.2
+++ openacs-4/packages/assessment/lib/session-items.adp	18 Feb 2007 22:33:56 -0000	1.12.2.3
@@ -4,6 +4,7 @@
     </if>
 
     <multiple name="items">
+<if @admin_p@><p><a href="asm-admin/item-edit-general?as_item_id=@items.as_item_id@&assessment_id=@assessment_id@&section_id=@items.section_id@" target="_new">Edit this question</a></p></if>
 <if @feedback_only_p@ eq 0 or @items.has_feedback_p@ eq 1>
      <if @show_item_name_p@ eq t><b>@items.name@:</b></if>
       <if @survey_p@ ne t and @items.title@ ne @items.next_title@>
Index: openacs-4/packages/assessment/lib/session-items.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/assessment/lib/session-items.tcl,v
diff -u -r1.16.2.1 -r1.16.2.2
--- openacs-4/packages/assessment/lib/session-items.tcl	26 Jan 2007 00:33:57 -0000	1.16.2.1
+++ openacs-4/packages/assessment/lib/session-items.tcl	18 Feb 2007 22:33:56 -0000	1.16.2.2
@@ -8,6 +8,13 @@
 if {![info exists assessment_id]} {
     set assessment_id $assessment_data(assessment_id)
 }
+
+set admin_p [permission::permission_p \
+		 -party_id [ad_conn user_id] \
+		 -privilege admin \
+		 -object_id $assessment_id]
+
+
 # if we can tell this is the last section, next button should go to feedback for the entire assessment.
 
 set section_list [as::assessment::sections -assessment_id $assessment_id -session_id $session_id -sort_order_type $assessment_data(section_navigation) -random_p $assessment_data(random_p)]