Index: openacs-4/packages/bug-tracker/lib/pagination.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/bug-tracker/lib/pagination.tcl,v
diff -u -r1.5 -r1.6
--- openacs-4/packages/bug-tracker/lib/pagination.tcl	30 Apr 2018 09:38:34 -0000	1.5
+++ openacs-4/packages/bug-tracker/lib/pagination.tcl	12 Mar 2019 16:47:23 -0000	1.6
@@ -26,14 +26,12 @@
         set interval_high $row_count
     }
     set href "$pagination_filter_base_url&offset=[expr {$interval_low - 1}]"
-    set interval_label [ad_decode $interval_low $row_count "$interval_high" "$interval_low - $interval_high"]
-    lappend pagination_filter_list [ad_decode [expr {1 + $offset}] \
-					$interval_low \
-					$interval_label \
-					[subst {<a href="[ns_quotehtml $href]">$interval_label</a>}]]
+    set interval_label [expr {$interval_low == $row_count ? $interval_high : "$interval_low - $interval_high"}]
+    lappend pagination_filter_list [expr {1 + $offset == $interval_low ?
+                                          $interval_label : [subst {<a href="[ns_quotehtml $href]">$interval_label</a>}]}]
 
     set interval_high [expr {$interval_high + $interval_size}]
-    set interval_low [expr {$interval_high - [expr {$interval_size - 1}]}]
+    set interval_low [expr {$interval_high - $interval_size - 1}]
 }
 
 set pagination_filter [join $pagination_filter_list " | "]