#!/usr/bin/env lisp
;;;
;;; generated by wxGlade
;;;

;;; This is an automatically generated file.
;;; Manual changes will be overwritten without warning!

(asdf:operate 'asdf:load-op 'wxcl)
(use-package "FFI")
(ffi:default-foreign-language :stdc)

(require "LispOgg2_MyDialog")

(defun init-func (fun data evt)
    (setf (textdomain) "LispOgg2_app") ;; replace with the appropriate catalog name
    (defun _ (msgid) (gettext msgid "LispOgg2_app"))

    (let ((Mp3-To-Ogg (make-LispOgg2_MyDialog)))
    (ELJApp_SetTopWindow (slot-top-window Mp3-To-Ogg))
    (wxWindow_Show (slot-top-window Mp3-To-Ogg))))

(unwind-protect
    (Eljapp_initializeC (wxclosure_Create #'init-func nil) 0 nil)
    (ffi:close-foreign-library "../miscellaneous/wxc-msw2.6.2.dll"))
