Index: openacs-4/packages/ecommerce/lib/pagination-bar.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/ecommerce/lib/pagination-bar.adp,v diff -u -r1.1 -r1.2 --- openacs-4/packages/ecommerce/lib/pagination-bar.adp 22 Dec 2008 12:33:24 -0000 1.1 +++ openacs-4/packages/ecommerce/lib/pagination-bar.adp 22 Dec 2008 13:09:54 -0000 1.2 @@ -1 +1 @@ -@prev_bar;noquote@ @current_bar@ @next_bar;noquote@ \ No newline at end of file +@prev_bar;noquote@ @current_bar;noquote@ @next_bar;noquote@ \ No newline at end of file Index: openacs-4/packages/ecommerce/lib/pagination-bar.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/ecommerce/lib/pagination-bar.tcl,v diff -u -r1.1 -r1.2 --- openacs-4/packages/ecommerce/lib/pagination-bar.tcl 22 Dec 2008 12:33:24 -0000 1.1 +++ openacs-4/packages/ecommerce/lib/pagination-bar.tcl 22 Dec 2008 13:09:54 -0000 1.2 @@ -11,10 +11,7 @@ } set bar_list_set [ecds_pagination_by_items $item_count $items_per_page $this_start_row] -set prev_bar $separator -set next_bar $separator - set prev_bar_list [lindex $bar_list_set 0] foreach {page_num start_row} $prev_bar_list { lappend prev_bar " ${page_num} " @@ -26,6 +23,6 @@ set next_bar_list [lindex $bar_list_set 2] foreach {page_num start_row} $next_bar_list { - append next_bar " ${page_num} " + lappend next_bar " ${page_num} " } set next_bar [join $next_bar $separator]