221 |
;;; Allow customization |
;;; Allow customization |
222 |
|
|
223 |
(defgroup SQL nil |
(defgroup SQL nil |
224 |
"Running a SQL interpreter from within Emacs buffers" |
"Running a SQL interpreter from within Emacs buffers." |
225 |
:version "20.4" |
:version "20.4" |
226 |
:group 'processes) |
:group 'processes) |
227 |
|
|
2077 |
(insert ", ")) |
(insert ", ")) |
2078 |
;; else insert a space |
;; else insert a space |
2079 |
(t |
(t |
2080 |
(if (eq (preceding-char) ? ) |
(if (eq (preceding-char) ?\s) |
2081 |
nil |
nil |
2082 |
(insert " "))))) |
(insert " "))))) |
2083 |
;; in any case, insert the column |
;; in any case, insert the column |