summaryrefslogtreecommitdiff
path: root/www/neowebscript/files/patch-common
diff options
context:
space:
mode:
authorMikhail Teterin <mi@FreeBSD.org>2001-10-28 08:37:27 +0000
committerMikhail Teterin <mi@FreeBSD.org>2001-10-28 08:37:27 +0000
commit40df45352156d24ae7ab2105eaf4b894900455f0 (patch)
tree5f9afb850e66875f994e795c1cb436bef20eb4b3 /www/neowebscript/files/patch-common
parentPrevent build from breaking when the user has incompatible version of (diff)
NeoWebScript[tm] is a module for the Apache webserver that allows you to
embed the Tcl/Tk programming language in your webpages as a scripting tool. It was invented by Karl Lehenbauer, NeoSoft's Chief Technical Officer, and documented, enhanced and extended by NeoSoft's programmers and technical writers. WWW: http://www.sourceforge.net/projects/nws/ The changes: . don't build the Apache, TclX, gd, db, neo-tcl bundled in the tarball, but use those that are installed by their ports . don't generate GIFs -- use PNGs . look in /var/log for Apache's log file . use /var/db/neowebscript for caches and per-user databases . expose some configuration knobs into the neowebscript.conf -- there should be no need to edit init.tcl itself anymore All of the bundled demos work, except for the gd-based banner generator. The demo code uses Gdtclft commands that don't exist in the modern Gdtclft.
Notes
Notes: svn path=/head/; revision=49283
Diffstat (limited to 'www/neowebscript/files/patch-common')
-rw-r--r--www/neowebscript/files/patch-common19
1 files changed, 19 insertions, 0 deletions
diff --git a/www/neowebscript/files/patch-common b/www/neowebscript/files/patch-common
new file mode 100644
index 000000000000..2dd036c4c2bd
--- /dev/null
+++ b/www/neowebscript/files/patch-common
@@ -0,0 +1,19 @@
+--- ../neowebscript/common.tcl Fri Nov 19 19:36:10 1999
++++ ../neowebscript/common.tcl Mon Sep 3 13:32:49 2001
+@@ -31,7 +31,7 @@
+
+ if {[catch {mkdir -path $parallelDir$plusSubDir} result] == 1} {
+ if {[lrange $errorCode 0 1] != "POSIX EEXIST"} {
+- error "$errorCode"
++ error "can not create $parallelDir $plusSubDir: $errorCode"
+ }
+ }
+ }
+@@ -512 +512,7 @@
+ }
++
++proc emit_full_header {title} {
++ html <HTML><HEAD><TITLE>
++ html $title
++ html </TITLE><HEAD>
++}