Index: openacs-4/packages/assessment/lib/feedback.adp
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/assessment/lib/feedback.adp,v
diff -u -N -r1.8 -r1.9
--- openacs-4/packages/assessment/lib/feedback.adp	7 Aug 2017 23:48:03 -0000	1.8
+++ openacs-4/packages/assessment/lib/feedback.adp	17 Jul 2018 19:15:25 -0000	1.9
@@ -4,7 +4,7 @@
 <if @assessment_data.html_title@ not nil><h2>@assessment_data.html_title;noquote@: Feedback</h2></if>
 
 <if @total_pages@ defined>
-  <include src="/packages/assessment/lib/progress-bar" total="@total_pages;literal@" current="@current_page;literal@" finished_page="@finished_page;literal@">
+  <include src="/packages/acs-tcl/lib/static-progress-bar" total="@total_pages;literal@" current="@current_page;literal@" finished_page="@finished_page;literal@">
 </if>
 
   <h2>@section_title@</h2>
Index: openacs-4/packages/assessment/lib/progress-bar.adp
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/assessment/lib/Attic/progress-bar.adp,v
diff -u -N
--- openacs-4/packages/assessment/lib/progress-bar.adp	1 Dec 2008 16:57:02 -0000	1.3
+++ /dev/null	1 Jan 1970 00:00:00 -0000
@@ -1,24 +0,0 @@
-<if @total@ gt 1>
-<table width="100%" border="0" cellpadding="2" cellspacing="3">
-  <tr style="color: @header_color@; font-weight: bold;">
-    <td>#assessment.Percentage_complete#</td>
-    <td align="right">#assessment.Page_current_of_total#</td>
-  </tr>
-  <tr>
-    <td colspan="2" bgcolor="@bgcolor@">
-      <table width="100%" border="0" cellpadding="0" cellspacing="0" style="border: 1px solid white;">
-        <tr>
-        <if @percentage_done@ gt 0>
-          <td bgcolor="@bgcolor@" width="@percentage_done@%" align="right"><span style="font-weight: bold; color: @fontcolor@;">@percentage_done@ %</span>&nbsp;</td>
-          <td bgcolor="white" width="100%" background="@bgimage@"> </td>
-        </if>
-        <else>
-          <td background="@bgimage@" colspan="2">&nbsp;<span style="font-weight: bold; color: @fontcolor@;">0 %</span></td>
-        </else>
-        </tr>
-      </table>
-    </td> 
-  </tr>
-</table>
-<br>
-</if>
Index: openacs-4/packages/assessment/lib/progress-bar.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/assessment/lib/Attic/progress-bar.tcl,v
diff -u -N
--- openacs-4/packages/assessment/lib/progress-bar.tcl	17 Jul 2018 13:32:18 -0000	1.5
+++ /dev/null	1 Jan 1970 00:00:00 -0000
@@ -1,55 +0,0 @@
-# packages/assessment/lib/progress-bar.tcl
-#
-# include this to show a progress bar for an assessment
-# vinodk: taken from KSG survey
-#
-# @author Deds Castillo (deds@i-manila.com.ph)
-# @creation-date 2004-11-08
-#
-# params: total (int) - number of pages in entire assessment
-#         current (int) - current page being shown
-#         finish (optional,boolean) - if supplied, then this is the final page
-#
-# NOTE: shows progress in terms of pages, NOT questions
-
-foreach required_param {total current} {
-    if {![info exists $required_param]} {
-        return -code error "$required_param is a required parameter."
-    }
-}
-
-if {![info exists finish]} {
-    set finish 0
-}
-
-if {![info exists bgcolor]} {
-    set bgcolor "\#aaaaaa"
-}
-
-if {![info exists fontcolor]} {
-    set fontcolor "white"
-}
-
-if {![info exists bgimage]} {
-    set bgimage "resources/pb-bg.gif"
-}
-
-if {![info exists header_color]} {
-    set header_color "black"
-}
-
-if { $total == 0 || [string is true $finish] } {
-    set percentage_done 100
-} elseif {[info exists finished_page] && $finished_page == $current} {
-    # subtract 1 from current, since we haven't completed this page yet
-    set percentage_done [expr {round($current * 100.0 / $total)}]
-} else {
-    # subtract 1 from current, since we haven't completed this page yet
-    set percentage_done [expr {round(($current - 1) * 100.0 / $total)}]
-}
-
-# Local variables:
-#    mode: tcl
-#    tcl-indent-level: 4
-#    indent-tabs-mode: nil
-# End: