Index: trunk/doc/user/06_feature/scripting/rosetta/12_hello_dad/ex.tcl
===================================================================
--- trunk/doc/user/06_feature/scripting/rosetta/12_hello_dad/ex.tcl	(nonexistent)
+++ trunk/doc/user/06_feature/scripting/rosetta/12_hello_dad/ex.tcl	(revision 20994)
@@ -0,0 +1,8 @@
+proc hello {} {
+	dad "heldi" "new"
+	dad "heldi" "label" "Hello world!"
+	dad "heldi" "run_modal" "hello-world" "Hello world dialog"
+	return 0
+}
+
+fgw_func_reg "hello"