diff options
| author | Bruce Momjian <bruce@momjian.us> | 2000-03-31 11:22:36 +0000 |
|---|---|---|
| committer | Bruce Momjian <bruce@momjian.us> | 2000-03-31 11:22:36 +0000 |
| commit | a34ce62fdf91afdfb6e1d56d0b8e86d1ab92c4df (patch) | |
| tree | 2b6c779c77cdb2a0f557fc317072441671b868e2 /src/bin/pgaccess/lib/functions.tcl | |
| parent | e854d3da54f22074e638dc126a298e064db1cb7a (diff) | |
| download | postgresql-a34ce62fdf91afdfb6e1d56d0b8e86d1ab92c4df.tar.gz postgresql-a34ce62fdf91afdfb6e1d56d0b8e86d1ab92c4df.zip | |
Update pgaccess to 0.98.5
Diffstat (limited to 'src/bin/pgaccess/lib/functions.tcl')
| -rw-r--r-- | src/bin/pgaccess/lib/functions.tcl | 3 |
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 |