A helper function to create a navigation widget

ex:

(init-navigation (make-instance 'my-navigation)
“test1” (make-instance ...)
“test2” (make-instance ...)