← Back to branch summary

~ubuntu-branches/ubuntu/raring/tcl8.5/raring

« back to all changes in this revision

Viewing changes to tests/http.test

  • Committer: Bazaar Package Importer
  • Author(s): Sergei Golovan
  • Date: 2009-03-01 10:35:30 UTC
  • mfrom: (8.1.1 sid)
  • Revision ID: james.westby@ubuntu.com-20090301103530-0nvyl18uo9sbu9wh
Tags: 8.5.6-3
Don't remove tclsh alternative in case of package upgrade because the
manually installed alternative is also removed which isn't desirable.

Show diffs side-by-side

added added

removed removed

Lines of Context:
tests/http.test
12
12
# of this file, and for a DISCLAIMER OF ALL WARRANTIES.
13
13
#
14
14
#
15
 
# RCS: @(#) $Id: http.test,v 1.48 2008/03/12 09:51:39 hobbs Exp $
 
15
# RCS: @(#) $Id: http.test,v 1.48.2.1 2008/12/11 01:20:02 patthoyts Exp $
16
16
 
17
17
if {[lsearch [namespace children] ::tcltest] == -1} {
18
18
    package require tcltest 2
364
364
test http-4.5 {http::Event} {
365
365
    set testfile [makeFile "" testfile]
366
366
    set out [open $testfile w]
 
367
    fconfigure $out -translation lf
367
368
    set token [http::geturl $url -channel $out]
368
369
    close $out
369
370
    upvar #0 $token data