From 400e4b916ff54d0a03748c555cf60e0a9dad4193 Mon Sep 17 00:00:00 2001
From: interp <interp>
Date: Sun, 19 Jan 2003 17:26:56 +0000
Subject: [PATCH] Correct javascript code.

---
 scheme/httpd/surflets/web-server/root/surflets/add-html.scm | 2 +-
 scheme/httpd/surflets/web-server/root/surflets/add-raw.scm  | 2 +-
 2 files changed, 2 insertions(+), 2 deletions(-)

diff --git a/scheme/httpd/surflets/web-server/root/surflets/add-html.scm b/scheme/httpd/surflets/web-server/root/surflets/add-html.scm
index f98cc28..1f82173 100644
--- a/scheme/httpd/surflets/web-server/root/surflets/add-html.scm
+++ b/scheme/httpd/surflets/web-server/root/surflets/add-html.scm
@@ -48,7 +48,7 @@
 			    (p ,(number->string (+ (get-number1) (get-number2))))
 			    (hr)
 			    (a (@ (href "add.scm")) "New calculation (new session)")(br)
-			    (a (@ (href "javascript:history.back(2)")) "New calculation (same session)")(br)
+			    (a (@ (href "javascript:history.go(-2)")) "New calculation (same session)")(br)
 			    (a (@ (href ,new-url)) "Close this session")))))))
 	;; How to clear session data and go to another HTML page:
 	(send/finish
diff --git a/scheme/httpd/surflets/web-server/root/surflets/add-raw.scm b/scheme/httpd/surflets/web-server/root/surflets/add-raw.scm
index 91c4cc5..4080d3a 100644
--- a/scheme/httpd/surflets/web-server/root/surflets/add-raw.scm
+++ b/scheme/httpd/surflets/web-server/root/surflets/add-raw.scm
@@ -76,7 +76,7 @@
 <P>
 <HR>
 <A href=\"add-html.scm\">New calculation (new session)</A><BR>
-<A href=\"javascript:history.back(2)\">New calculation (same session)</A><BR>
+<A href=\"javascript:history.go(-2)\">New calculation (same session)</A><BR>
 <A href=~s>Close this session</A>
 </BODY>
 </HTML>"