aboutsummaryrefslogtreecommitdiff
path: root/src/bin/pgaccess/lib/functions.tcl
diff options
context:
space:
mode:
Diffstat (limited to 'src/bin/pgaccess/lib/functions.tcl')
-rw-r--r--src/bin/pgaccess/lib/functions.tcl3
1 files changed, 2 insertions, 1 deletions
diff --git a/src/bin/pgaccess/lib/functions.tcl b/src/bin/pgaccess/lib/functions.tcl
index 96e48605926..84e7988ee81 100644
--- a/src/bin/pgaccess/lib/functions.tcl
+++ b/src/bin/pgaccess/lib/functions.tcl
@@ -57,7 +57,8 @@ global PgAcVar
showError [intlmsg "You must supply the function language!"]
} else {
set funcbody [.pgaw:Function.fs.text1 get 1.0 end]
- regsub -all "\n" $funcbody " " funcbody
+ # regsub -all "\n" $funcbody " " funcbody
+ regsub -all {'} $funcbody {''} funcbody
if {$PgAcVar(function,nametodrop) != ""} {
if {! [sql_exec noquiet "drop function $PgAcVar(function,nametodrop)"]} {
return