From: Mike Taylor <mike@indexdata.com>
Date: Mon, 25 Sep 2006 12:45:00 +0000 (+0000)
Subject: Pass "id" parameter to check.mc in both ways.
X-Git-Tag: CPAN-v1.02~54^2~991
X-Git-Url: http://git.indexdata.com/?p=irspy-moved-to-github.git;a=commitdiff_plain;h=bd08c0f68a197bc91c5b11bca2d84ef397321d35;hp=ef1ec4ae82e393dc4b9bdc1c5e70aa33cfc21c68

Pass "id" parameter to check.mc in both ways.
---

diff --git a/web/htdocs/details/add.mc b/web/htdocs/details/add.mc
index 07bb609..a0bce9c 100644
--- a/web/htdocs/details/add.mc
+++ b/web/htdocs/details/add.mc
@@ -1,4 +1,4 @@
-%# $Id: add.mc,v 1.1 2006-09-20 16:49:46 mike Exp $
+%# $Id: add.mc,v 1.2 2006-09-25 12:45:00 mike Exp $
 <%perl>
 if ($r->param("_add")) {
     my $host = $r->param("net.host");
@@ -6,7 +6,7 @@ if ($r->param("_add")) {
     my $db = $r->param("net.path");
     my $id = "$host:$port/$db";
     $r->param(id => $id);
-    $m->comp("check.mc");
+    $m->comp("check.mc", id => $id);
 } else {
 </%perl>
      <p>