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 | SQL archive
Timelines: family | ancestors | descendants | both | trunk
Files: files | file ages | folders
SHA3-256:867828f03abd697073b6dad1c18a9b204f967fa8b8bac37c5d17561a01fac868
User & Date: andy 2018-07-20 15:54:41
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
Hide Diffs Unified Diffs 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