removed redundant check

svn: r6198
This commit is contained in:
Eli Barzilay 2007-05-10 23:23:47 +00:00
parent 5d70dbdeef
commit 091e7c0673
2 changed files with 3 additions and 1 deletions

View File

@ -1,3 +1,6 @@
;; The main client of this module is browser/external.ss
;; (others just use the (send-url url [new?]) interface.)
(module sendurl mzscheme
(require (lib "process.ss")
(lib "file.ss")

View File

@ -44,7 +44,6 @@
(equal? (car v) "http")
(string? (car v))
(number? (caddr v))
(exact? (caddr v))
(integer? (caddr v))
(<= 1 (caddr v) 65535)))
v))