Index: help.tcl
==================================================================
--- help.tcl
+++ help.tcl
@@ -204,11 +204,11 @@
 	}
     }
     return
 }
 
-proc ::cmdr::help::format::Pager {} {
+proc ::cmdr::help::Pager {} {
     global env
     if {[info exists env(PAGER)]} {
 	lappend pager $env(PAGER)
     }
     lappend pager less