From fd9819f69b93e91226804eb0cc82a6e7a8340cf8 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Henrik=20Grubbstr=C3=B6m=20=28Grubba=29?=
 <grubba@grubba.org>
Date: Thu, 19 Mar 1998 20:55:25 +0100
Subject: [PATCH] Added quote().

Rev: lib/modules/Sql.pmod/sql.pike:1.17
---
 lib/modules/Sql.pmod/sql.pike | 15 +++++++++++++--
 1 file changed, 13 insertions(+), 2 deletions(-)

diff --git a/lib/modules/Sql.pmod/sql.pike b/lib/modules/Sql.pmod/sql.pike
index 4bddf7a656..ec491e287c 100644
--- a/lib/modules/Sql.pmod/sql.pike
+++ b/lib/modules/Sql.pmod/sql.pike
@@ -1,5 +1,5 @@
 /*
- * $Id: sql.pike,v 1.16 1998/01/14 21:45:44 grubba Exp $
+ * $Id: sql.pike,v 1.17 1998/03/19 19:55:25 grubba Exp $
  *
  * Implements the generic parts of the SQL-interface
  *
@@ -8,7 +8,7 @@
 
 //.
 //. File:	sql.pike
-//. RCSID:	$Id: sql.pike,v 1.16 1998/01/14 21:45:44 grubba Exp $
+//. RCSID:	$Id: sql.pike,v 1.17 1998/03/19 19:55:25 grubba Exp $
 //. Author:	Henrik Grubbstr�m (grubba@infovav.se)
 //.
 //. Synopsis:	Implements the generic parts of the SQL-interface.
@@ -35,6 +35,17 @@ object master_sql;
 //.   1 - Yes
 int case_convert;
 
+//. - quote
+//.   Quote a string so that it can safely be pu in a query.
+//. > s - String to qoute.
+string quote(string s)
+{
+  if (master_sql && master_sql->quote) {
+    return(master_sql->quote(s));
+  }
+  return(replace(s, "\'", "\'\'"));
+}
+
 //. - create
 //.   Create a new generic SQL object.
 //. > host
-- 
GitLab