From 63783214165ba2beb3a0b4ec5b3fbee84dd47808 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Henrik=20Grubbstr=C3=B6m=20=28Grubba=29?=
<grubba@grubba.org>
Date: Fri, 3 Jul 1998 13:42:28 +0200
Subject: [PATCH] Change to support '/''s in the database host specification.
Rev: lib/modules/Sql.pmod/sql.pike:1.24
---
lib/modules/Sql.pmod/sql.pike | 8 ++++----
1 file changed, 4 insertions(+), 4 deletions(-)
diff --git a/lib/modules/Sql.pmod/sql.pike b/lib/modules/Sql.pmod/sql.pike
index cde990e4d9..d1af3f590a 100644
--- a/lib/modules/Sql.pmod/sql.pike
+++ b/lib/modules/Sql.pmod/sql.pike
@@ -1,5 +1,5 @@
/*
- * $Id: sql.pike,v 1.23 1998/06/17 13:01:36 grubba Exp $
+ * $Id: sql.pike,v 1.24 1998/07/03 11:42:28 grubba Exp $
*
* Implements the generic parts of the SQL-interface
*
@@ -8,7 +8,7 @@
//.
//. File: sql.pike
-//. RCSID: $Id: sql.pike,v 1.23 1998/06/17 13:01:36 grubba Exp $
+//. RCSID: $Id: sql.pike,v 1.24 1998/07/03 11:42:28 grubba Exp $
//. Author: Henrik Grubbstr�m (grubba@idonex.se)
//.
//. Synopsis: Implements the generic parts of the SQL-interface.
@@ -120,8 +120,8 @@ void create(void|string|object host, void|string db,
arr = host/"/";
if (sizeof(arr) > 1) {
if (!db) {
- db = arr[1..]*"/";
- host = arr[0];
+ db = arr[-1];
+ host = arr[..sizeof(arr)-2]*"/";
}
}
}
--
GitLab