"moved-temp" -> "temp-redirect"
(HTTP/1.1: use 307 instead of 302 for unambiguity)
This commit is contained in:
		
							parent
							
								
									7b6f5675af
								
							
						
					
					
						commit
						7bdd94cdb5
					
				| 
						 | 
					@ -53,7 +53,7 @@
 | 
				
			||||||
			    (a (@ (href "javascript:history.go(-2)")) "New calculation (same session)")(br)
 | 
								    (a (@ (href "javascript:history.go(-2)")) "New calculation (same session)")(br)
 | 
				
			||||||
			    (a (@ (href ,new-url)) "Close this session")))))))
 | 
								    (a (@ (href ,new-url)) "Close this session")))))))
 | 
				
			||||||
	;; How to clear session data and go to another HTML page:
 | 
						;; How to clear session data and go to another HTML page:
 | 
				
			||||||
	(send-error (status-code moved-temp) req 
 | 
						(send-error (status-code temp-redirect) req 
 | 
				
			||||||
		    "/" "/")
 | 
							    "/" "/")
 | 
				
			||||||
	))
 | 
						))
 | 
				
			||||||
;	))
 | 
					;	))
 | 
				
			||||||
| 
						 | 
					
 | 
				
			||||||
| 
						 | 
					@ -96,7 +96,7 @@
 | 
				
			||||||
      (send/suspend make-result-page)
 | 
					      (send/suspend make-result-page)
 | 
				
			||||||
      ;; This finishes the session and does a redirect to the root
 | 
					      ;; This finishes the session and does a redirect to the root
 | 
				
			||||||
      ;; page.
 | 
					      ;; page.
 | 
				
			||||||
      (send-error (status-code moved-temp) #f "/" "/"))
 | 
					      (send-error (status-code temp-redirect) #f "/" "/"))
 | 
				
			||||||
 | 
					
 | 
				
			||||||
    ))
 | 
					    ))
 | 
				
			||||||
	 
 | 
						 
 | 
				
			||||||
		Loading…
	
		Reference in New Issue