Tcl Library Source Code

Changes On Branch tkt-997c8b4e67-aku
Login
Core Home Blog Docs Downloads Tickets Timeline Branches Tags Wiki
Hide Diff Patch Side-by-Side Diff

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

Changes In Branch tkt-997c8b4e67-aku Excluding Merge-Ins

This is equivalent to a diff from 78d7722e1e to e6c5341f16

2018-02-01
04:33
Merged work on tkt [997c8b4e67] to release rc check-in: 5e6fbe3de1 user: aku tags: tcllib-1-19-rc
2018-01-25
05:01
Tkt [997c8b4e67] rest/rest <B> More fixes to the command extraction and validation. Closed-Leaf check-in: e6c5341f16 user: aku tags: tkt-997c8b4e67-aku
2017-08-07
23:41
Merged fix for ticket [cb043ecc70e0e90bf]. check-in: c76dc6a3fc user: aku tags: trunk
23:27
Test demonstrating the problem Closed-Leaf check-in: d345a5a2e5 user: aku tags: tkt-cb043ecc70e0e90bff9-demo
2017-08-06
16:29
fix math::geometry::areaPolygon plus polish the module. check-in: 3cb80496a0 user: avl42 tags: avl-fix-areaPolygon-and-more
2017-06-05
21:22
Sync to trunk. check-in: f736853eec user: aku tags: tkt-997c8b4e67-aku
21:00
Merged fixes for tkt [71deadcf96]. check-in: 78d7722e1e user: aku tags: trunk
20:59
Bump version of "pt::rde::nx" properly. Closed-Leaf check-in: 329f77b79d user: aku tags: pt-nx-fixes
2017-05-30
16:26
Merged fixes for ticket e4cfcc0f96: handling of null by hullde json writer. check-in: bf5f60bebe user: andreask tags: trunk

Changes to modules/rest/pkgIndex.tcl. 

1
2


1

2


-
+

if {![package vsatisfies [package provide Tcl] 8.5]} {return}
package ifneeded rest 1.3 [list source [file join $dir rest.tcl]]
package ifneeded rest 1.3.1 [list source [file join $dir rest.tcl]]

Changes to modules/rest/rest.man. 

1
2

3
4
5
6
7
8
9

1

2
3
4
5
6
7
8
9


-
+








[comment {-*- tcl -*- doctools manpage}]
[vset VERSION 1.3]
[vset VERSION 1.3.1]
[manpage_begin rest n [vset VERSION]]
[moddesc   {A framework for RESTful web services}]
[titledesc {define REST web APIs and call them inline or asychronously}]
[require Tcl 8.5]
[require rest [opt [vset VERSION]]]
[description]
︙

Changes to modules/rest/rest.tcl.

︙
8
9
10
11
12
13
14
15

16
17
18
19
20
21
22

8
9
10
11
12
13
14

15
16
17
18
19
20
21
22








-
+









package require Tcl 8.5
package require http 2.7
package require json
package require tdom
package require base64

package provide rest 1.3
package provide rest 1.3.1

namespace eval ::rest {
    namespace export create_interface parameters parse_opts save \
    describe substitute
}

# simple --
︙
105
106
107
108
109
110
111


112
113
114
115
116
117
118
119
120
121
122
123

105
106
107
108
109
110
111
112
113
114
115
116


117
118
119
120
121
122
123








+
+



-
-








	set cmd [lindex $cmd 0]
    }]} {
	# Not a proper list. String processing.
	# Simple: Assume name without spaces.
	# TODO: Quoted literal.
	regexp {^([^ ]+).*$} $cmd -> cmd
    }
    set cmd [namespace tail $cmd]    
    if {$cmd eq "simple"} { set cmd get }
    if {$cmd ni {get delete head post put patch}} {
	return -code error "Unable to determine rest::simple method, found \"$cmd\". Please specify it explicitly."
    }
    set cmd [namespace tail $cmd]    
    if {$cmd eq "simple"} { set cmd get }
    #puts >>>|$cmd|
    dict set config method $cmd
    return
}

# create_interface --
#
︙

This page was generated in about 0.064s by Fossil 2.25 [c09fea3299] 2024-05-08 11:59:18