can't read "dir": no such variable
    while executing
"list __tcl3dGaugesSourcePkgs $dir"
    (in namespace eval "::request" script line 34)
    invoked from within
"namespace eval ::request $script"
    ("::try" body line 12)
OUTPUT BUFFER:
#******************************************************************************
#
#       Copyright:      2005-2018 Paul Obermeier (obermeier@tcl3d.org)
#
#                       See the file "Tcl3D_License.txt" for information on
#                       usage and redistribution of this file, and for a
#                       DISCLAIMER OF ALL WARRANTIES.
#
#       Module:         Tcl3D -> tcl3dGauges
#       Filename:       pkgIndex.tcl
#
#       Author:         Paul Obermeier
#
#       Description:    Tcl index file for the tcl3dGauges package.
#
#******************************************************************************

proc __tcl3dGaugesSourcePkgs { dir } {
    source [file join $dir gaugeImgs.tcl]
    source [file join $dir gaugeBase64.tcl]
    source [file join $dir airspeed.tcl]
    source [file join $dir altimeter.tcl]
    source [file join $dir compass.tcl]
    source [file join $dir tiltmeter.tcl]

    package provide tcl3dgauges 0.9.3
}

if { ! [package vsatisfies [package provide Tcl] 8.5] } {
    return
}

# All modules are exported as package tcl3dgauges
package ifneeded tcl3dgauges 0.9.3 "[list __tcl3dGaugesSourcePkgs $dir]"