Index: library/lib/doc-tools.tcl
===================================================================
diff -u -rc217b55f7a8da19973a49665570c25b62c468509 -rf60d445f73acb4b434f41c990c0469b3252c44c5
--- library/lib/doc-tools.tcl (.../doc-tools.tcl) (revision c217b55f7a8da19973a49665570c25b62c468509)
+++ library/lib/doc-tools.tcl (.../doc-tools.tcl) (revision f60d445f73acb4b434f41c990c0469b3252c44c5)
@@ -24,7 +24,9 @@
# @version 0.1
package provide nx::doc 0.1
+
package require nx
+package require nx::pp
namespace eval ::nx::doc {
namespace import -force ::nx::*
@@ -1753,7 +1755,8 @@
}
:method listing {{-inline true} script} {
- return [expr {$inline?"$script
":"
$script"}] + #return [expr {$inline?"
$script
":"$script"}] + return [expr {$inline?"
$script
":[nx::pp render $script]}]
}
:method link {tag names} {
@@ -2329,7 +2332,7 @@
[::nsf::configure objectsystem] eq ""} {
set rootclass ::nx::doc::_%&obj
set rootmclass ::nx::doc::_%&cls
- ::nsf::createobjectsystem ::nx::doc::_%&obj ::nx::doc::_%&cls
+ ::nsf::createobjectsystem $rootclass $rootmclass
} else {
lassign {*}[::nsf::configure objectsystem] rootclass rootmclass
}