From 9090c67309e46afcb82a2f260ce9d3ecd306e38f Mon Sep 17 00:00:00 2001
From: "Pierre Habouzit (MadCoder" <pierre.habouzit@m4x.org>
Date: Fri, 7 Jan 2005 22:15:56 +0000
Subject: [PATCH] wibble

git-archimport-id: opensource@polytechnique.org--2005/banana--mainline--1.0--patch-11
---
 banana/spool.inc.php | 12 ++++++++++--
 1 file changed, 10 insertions(+), 2 deletions(-)

diff --git a/banana/spool.inc.php b/banana/spool.inc.php
index f657d55..9e078f2 100644
--- a/banana/spool.inc.php
+++ b/banana/spool.inc.php
@@ -124,7 +124,7 @@ class BananaSpool
 
     function _readFromFile()
     {
-        $file = dirname(dirname(__FILE__))."/spool/spool-{$this->group}.dat";
+        $file = $this->_spoolfile();
         if (file_exists($file)) {
             $this = unserialize(file_get_contents($file));
         }
@@ -132,7 +132,7 @@ class BananaSpool
 
     function _saveToFile()
     {
-        $file = dirname(dirname(__FILE__))."/spool/spool-{$this->group}.dat";
+        $file = $this->_spoolfile();
         uasort($this->overview, "spoolcompare");
 
         $this->roots = Array();
@@ -145,6 +145,14 @@ class BananaSpool
         file_put_contents($file, serialize($this));
     }
 
+    function _spoolfile()
+    {
+        global $banana;
+        $url = parse_url($banana->host);
+        $file = $url['host'].'_'.$url['port'].'_'.$this->group;
+        return dirname(dirname(__FILE__)).'/spool/'.$file;
+    }
+
     function _updateSpool($arg)
     {
         global $banana;
-- 
2.1.4