(deftool ("test" "tool") ((file (picasso-path ".login")))
  "This is the VIP tool" 
  (title "Picasso:  Editor") 
  (frames (f1 ("test" "frame")))
  (init-code (format t "Howdy Fellows~%"))
  (exit-code (describe self)))

