chickadee » leptonic » lept-reset

lept-resetprocedure
  • restores the original output of error messages to stderr.
(import leptonic)
;; a callback procedure
(lambda ()
  ...
  <read an image file ...>
  (if (not (zero? result))
    ;; retrieve error text
    (write-to-widget (lept-errmsg))
    ;; use image 
    (display-image <img-data>))
  ...)
;; call once at start of program
(lept-redirect)
...