Gauche-fastcgi-0.1.3がcgi-metavariablesを上書きしてしまう (Gauche-devel-jp) - Gauche

山田と申します。

with-fastcgi が、
それ以前にparameterizeしていた(cgi-metavariables)の内容を
破棄してしまう事に気付いたので、
それ以前の(cgi-metavariables)の内容をマージするようなパッチを書きました。
http://d.tir.jp/Gauche-fastcgi-0.1.3-mvs.patch
にも置いています。

それでは、どうかよろしくお願いします。

--- www/fastcgi.scm.orig	2007-02-28 08:26:23.000000000 +0900
+++ www/fastcgi.scm	2007-02-28 08:32:55.000000000 +0900
@@ -34,6 +34,7 @@
 ;;;
 
 (define-module www.fastcgi
+  (use srfi-1)
   (use www.cgi)
   (use gauche.parameter)
   (export call-with-fastcgi with-fastcgi))
@@ -94,7 +95,13 @@
             (lambda ()
               (with-error-to-port eport
                 (lambda ()
-                  (parameterize ((cgi-metavariables mvs))
+                  (parameterize ((cgi-metavariables (delete-duplicates
+                                                      (append
+                                                        mvs
+                                                        (cgi-metavariables))
+                                                      (lambda (x y)
+                                                        (equal? (car x)
+                                                                (car y))))))
                     (thunk)))))))))))
 
 (provide "www/fastcgi")




Gauche

[Gauche-devel-jp] Gauche-fastcgi-0.1.3がcgi-metavariablesを上書きしてしまう