tclhttpd

Check-in [9aaf42ca4e]
Login

Check-in [9aaf42ca4e]

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

Overview
Comment:Fixed a type in community Fixed the pkgIndex.tcl file in modules/httpd Removed the requirement for odielib
Timelines: family | ancestors | descendants | both | 4_0
Files: files | file ages | folders
SHA1: 9aaf42ca4e446a1eb88046a3389876b9e8d1b685
User & Date: hypnotoad 2015-04-02 09:47:24.891
Context
2015-04-02
10:20
Updated the readme check-in: ee8656421b user: hypnotoad tags: 4_0
09:47
Fixed a type in community Fixed the pkgIndex.tcl file in modules/httpd Removed the requirement for odielib check-in: 9aaf42ca4e user: hypnotoad tags: 4_0
09:39
Adding a distribution of the Tao core Moved taourl out to a seperate file Adding a stub page to document qwiki check-in: 52ee0a713b user: hypnotoad tags: 4_0
Changes
Unified Diff Ignore Whitespace Patch
Changes to modules/community/community.tcl.
327
328
329
330
331
332
333
334
335
336
337
338
339
340
341
      }
      ::Cookie_Set {*}$cookie_args
    }
  }
  
  method httpdHostName {} {
    my variable env
    return [lindex [split [get env(HTTP_HOST) host] :] 0]
  }
  
  method httpdSessionSave sock {
    # Save any return cookies which have been set.
    # This works with the Doc_SetCookie procedure that populates
    # the global cookie array.
    







|







327
328
329
330
331
332
333
334
335
336
337
338
339
340
341
      }
      ::Cookie_Set {*}$cookie_args
    }
  }
  
  method httpdHostName {} {
    my variable env
    return [lindex [split [get env(HTTP_HOST)] :] 0]
  }
  
  method httpdSessionSave sock {
    # Save any return cookies which have been set.
    # This works with the Doc_SetCookie procedure that populates
    # the global cookie array.
    
Changes to modules/httpd/pkgIndex.tcl.
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
package ifneeded httpd::compat 3.3 [list source [file join $dir compat.tcl]]
package ifneeded httpd::config 1.0 [list source [file join $dir config.tcl]]
package ifneeded httpd::cookie 1.0 [list source [file join $dir cookie.tcl]]
package ifneeded httpd::counter 2.0 [list source [file join $dir counter.tcl]]
package ifneeded httpd::debug 1.0 [list source [file join $dir debug.tcl]]
package ifneeded httpd::digest 1.0 [list source [file join $dir digest.tcl]]
package ifneeded httpd::direct 1.1 [list source [file join $dir direct.tcl]]
package ifneeded httpd::directoo 0.1 [list source [file join $dir directoo.tcl]]
package ifneeded httpd::dirlist 1.1 [list source [file join $dir dirlist.tcl]]
package ifneeded httpd::doc 1.1 [list source [file join $dir doc.tcl]]
package ifneeded httpd::doc_error 1.0 [list source [file join $dir doc_error.tcl]]
package ifneeded httpd::doctools 1.0 [list source [file join $dir doctools.tcl]]
package ifneeded httpd::fallback 1.0 [list source [file join $dir fallback.tcl]]
package ifneeded httpd::imagemap 1.0 [list source [file join $dir imagemap.tcl]]
package ifneeded httpd::include 1.0 [list source [file join $dir include.tcl]]







<







15
16
17
18
19
20
21

22
23
24
25
26
27
28
package ifneeded httpd::compat 3.3 [list source [file join $dir compat.tcl]]
package ifneeded httpd::config 1.0 [list source [file join $dir config.tcl]]
package ifneeded httpd::cookie 1.0 [list source [file join $dir cookie.tcl]]
package ifneeded httpd::counter 2.0 [list source [file join $dir counter.tcl]]
package ifneeded httpd::debug 1.0 [list source [file join $dir debug.tcl]]
package ifneeded httpd::digest 1.0 [list source [file join $dir digest.tcl]]
package ifneeded httpd::direct 1.1 [list source [file join $dir direct.tcl]]

package ifneeded httpd::dirlist 1.1 [list source [file join $dir dirlist.tcl]]
package ifneeded httpd::doc 1.1 [list source [file join $dir doc.tcl]]
package ifneeded httpd::doc_error 1.0 [list source [file join $dir doc_error.tcl]]
package ifneeded httpd::doctools 1.0 [list source [file join $dir doctools.tcl]]
package ifneeded httpd::fallback 1.0 [list source [file join $dir fallback.tcl]]
package ifneeded httpd::imagemap 1.0 [list source [file join $dir imagemap.tcl]]
package ifneeded httpd::include 1.0 [list source [file join $dir include.tcl]]
Changes to modules/tao/index.tcl.
1
2
3
4
5
6
7
8
9
10
11
package provide tao 9.4.4
package require sqlite3
package require TclOO
package require odie
package require listutil 1.7

::namespace eval ::tao {}

###
# topic: f796a2dcb22de645fb365e07d39fce07
###



<







1
2
3

4
5
6
7
8
9
10
package provide tao 9.4.4
package require sqlite3
package require TclOO

package require listutil 1.7

::namespace eval ::tao {}

###
# topic: f796a2dcb22de645fb365e07d39fce07
###