#---------------
#debug/test only - don't output to stdout/stderr in production code
#puts stdout "pdf2text.tcl: converting PDF to text"
#puts stdout "::argv: $::argv"
#---------------

package require tclMuPDF
package require punk::args
package require punk::ansi
package require punk::lib
package require textblock
package require punk::pdf

if {$::tcl_interactive} {
    if {[catch {
        package require punk::nav::ns
        punk::nav::ns::ns/ // punk::pdf
    } err eopts]} {
        puts stdout "Error loading/navigating to punk::nav::ns: $err"
    }  else {
        namespace eval ::punk::pdf {
            set text [punk::pdf::text -outchannel return {*}$::argv]
            puts stdout $text
        }
    }
} else {
    #default -outchannel stdout.
    punk::pdf::text {*}$::argv
}

return