version 1.23, 2007/12/31 18:40:24
|
version 1.26, 2008/07/15 16:11:49
|
Line 1
|
Line 1
|
#! /usr/local/bin/gforth |
#! /usr/local/bin/gforth |
|
|
\ Copyright (C) 2000,2002,2003,2004,2006 Free Software Foundation, Inc. |
\ Copyright (C) 2000,2002,2003,2004,2006,2007,2008 Free Software Foundation, Inc. |
|
|
\ This file is part of Gforth. |
\ This file is part of Gforth. |
|
|
Line 197 wordlist constant mime
|
Line 197 wordlist constant mime
|
mime set-current |
mime set-current |
|
|
: shtml ( addr u -- ) lastrequest |
: shtml ( addr u -- ) lastrequest |
data @ IF included ELSE 2drop THEN ; |
data @ IF also forth included previous ELSE 2drop THEN ; |
|
|
s" application/pgp-signature" transparent: sig |
s" application/pgp-signature" transparent: sig |
s" application/x-bzip2" transparent: bz2 |
s" application/x-bzip2" transparent: bz2 |