Index: doc/example-scripts/bagel.tcl
===================================================================
diff -u -rea09e74f9faa81e79037b6cb14a5798627637388 -r275da34d3d7a874a451eced58242b738c8a37d1a
--- doc/example-scripts/bagel.tcl	(.../bagel.tcl)	(revision ea09e74f9faa81e79037b6cb14a5798627637388)
+++ doc/example-scripts/bagel.tcl	(.../bagel.tcl)	(revision 275da34d3d7a874a451eced58242b738c8a37d1a)
@@ -100,7 +100,8 @@
     :property -incremental {toppings:0..n ""}
 }} ::SpreadableBagel
 
-? {SpreadableBagel info superclass} ::Bagel
+? {SpreadableBagel cget -superclass} ::Bagel
+? {SpreadableBagel info superclasses} ::Bagel
 
 ? {SpreadableBagel info heritage} {::Bagel ::nx::Object}