;;
;;
;; This file is a test file for screem's guile script support
;;
;;

(define (script-register)
  (define author "David A Knight")
  (define callback "(callback)")
  (define label    "Test Script")
  (define menupath "/Test/" )

  (screem-script-register author callback label menupath)
)

(define (callback)
  (screem-editor-insert 0 "testing 123")
  )
