Check-in [867828f03a]
Not logged in

Many hyperlinks are disabled.
Use anonymous login to enable hyperlinks.

Overview
Comment:Correct which document is being imported. Ticket [61fd346dc3]
Downloads: Tarball | ZIP archive
Timelines: family | ancestors | descendants | both | trunk
Files: files | file ages | folders
SHA3-256: 867828f03abd697073b6dad1c18a9b204f967fa8b8bac37c5d17561a01fac868
User & Date: andy 2018-07-20 15:54:41.237
Original Comment: Correct which document is being imported
References
2018-09-03 17:52 New ticket [61fd346dc3] WSDL Scheme subtree used instead of document - not found. artifact: dfdca05e9f user: oehhar
Context
2018-07-20 15:55
Spelling correction, though keep old name for compatibility check-in: 77d58d723c user: andy tags: trunk
2018-07-20 15:54
Correct which document is being imported. Ticket [61fd346dc3] check-in: 867828f03a user: andy tags: trunk
2018-07-20 15:46
Add missing variable import. Ticket [7bb1cd7b43] check-in: 1fb2ffad2d user: andy tags: trunk
Changes
Unified Diff Ignore Whitespace Patch
Changes to Utilities.tcl.
787
788
789
790
791
792
793
794
795
796
797
798
799
800
801
        puts stderr "Error processing include $schema $baseUrl"
        puts stderr $::errorInfo
        puts stderr $::errorCode
        puts stderr $errMsg
    }

    set prevSchema $currentSchema
    set nodeList [$schema selectNodes -namespaces $nsList descendant::xs:schema]
    foreach node $nodeList {
        set currentSchema $node
        parseScheme $mode $baseUrl $node $serviceName serviceInfo tnsCount
    }

    set currentSchema $prevSchema
    $doc delete







|







787
788
789
790
791
792
793
794
795
796
797
798
799
800
801
        puts stderr "Error processing include $schema $baseUrl"
        puts stderr $::errorInfo
        puts stderr $::errorCode
        puts stderr $errMsg
    }

    set prevSchema $currentSchema
    set nodeList [$doc selectNodes -namespaces $nsList descendant::xs:schema]
    foreach node $nodeList {
        set currentSchema $node
        parseScheme $mode $baseUrl $node $serviceName serviceInfo tnsCount
    }

    set currentSchema $prevSchema
    $doc delete