Mercurial > emacs
comparison lisp/progmodes/sql.el @ 62772:f2892faa87d4
* progmodes/ada-mode.el (ada-mode):
* progmodes/antlr-mode.el (antlr-mode):
* progmodes/autoconf.el (autoconf-mode):
* progmodes/dcl-mode.el (dcl-mode):
* progmodes/delphi.el (delphi-mode):
* progmodes/ebrowse.el (ebrowse-tree-mode)
(ebrowse-electric-list-mode, ebrowse-member-mode)
(ebrowse-electric-position-mode):
* progmodes/f90.el (f90-mode):
* progmodes/fortran.el (fortran-mode):
* progmodes/icon.el (icon-mode):
* progmodes/idlw-help.el (idlwave-help-mode):
* progmodes/idlw-shell.el (idlwave-shell-mode):
* progmodes/idlwave.el (idlwave-mode):
* progmodes/inf-lisp.el (inferior-lisp-mode):
* progmodes/m4-mode.el (m4-mode):
* progmodes/meta-mode.el (metafont-mode, metapost-mode):
* progmodes/modula2.el (modula-2-mode):
* progmodes/octave-inf.el (inferior-octave-mode):
* progmodes/octave-mod.el (octave-mode):
* progmodes/pascal.el (pascal-mode):
* progmodes/sh-script.el (sh-mode):
* progmodes/sql.el (sql-mode, sql-interactive-mode):
* progmodes/vhdl-mode.el (vhdl-mode):
* progmodes/xscheme.el (scheme-interaction-mode): Use run-mode-hooks.
author | Lute Kamstra <lute@gnu.org> |
---|---|
date | Thu, 26 May 2005 16:39:28 +0000 |
parents | aac0a33f5772 |
children | 37dd5dc2f5ae 01137c1fdbe9 |
comparison
equal
deleted
inserted
replaced
62771:a0b0cf078b7b | 62772:f2892faa87d4 |
---|---|
2247 paragraph-start "[\n\f]") | 2247 paragraph-start "[\n\f]") |
2248 ;; Abbrevs | 2248 ;; Abbrevs |
2249 (setq local-abbrev-table sql-mode-abbrev-table) | 2249 (setq local-abbrev-table sql-mode-abbrev-table) |
2250 (setq abbrev-all-caps 1) | 2250 (setq abbrev-all-caps 1) |
2251 ;; Run hook | 2251 ;; Run hook |
2252 (run-hooks 'sql-mode-hook) | 2252 (run-mode-hooks 'sql-mode-hook) |
2253 ;; Catch changes to sql-product and highlight accordingly | 2253 ;; Catch changes to sql-product and highlight accordingly |
2254 (sql-highlight-product) | 2254 (sql-highlight-product) |
2255 (add-hook 'hack-local-variables-hook 'sql-highlight-product t t)) | 2255 (add-hook 'hack-local-variables-hook 'sql-highlight-product t t)) |
2256 | 2256 |
2257 | 2257 |
2365 (set (make-local-variable 'sql-prompt-length) | 2365 (set (make-local-variable 'sql-prompt-length) |
2366 (sql-product-feature :sqli-prompt-length)) | 2366 (sql-product-feature :sqli-prompt-length)) |
2367 (make-local-variable 'sql-input-ring-separator) | 2367 (make-local-variable 'sql-input-ring-separator) |
2368 (make-local-variable 'sql-input-ring-file-name) | 2368 (make-local-variable 'sql-input-ring-file-name) |
2369 ;; Run hook. | 2369 ;; Run hook. |
2370 (run-hooks 'sql-interactive-mode-hook) | 2370 (run-mode-hooks 'sql-interactive-mode-hook) |
2371 ;; Set comint based on user overrides. | 2371 ;; Set comint based on user overrides. |
2372 (setq comint-prompt-regexp sql-prompt-regexp) | 2372 (setq comint-prompt-regexp sql-prompt-regexp) |
2373 (setq left-margin sql-prompt-length) | 2373 (setq left-margin sql-prompt-length) |
2374 ;; People wanting a different history file for each | 2374 ;; People wanting a different history file for each |
2375 ;; buffer/process/client/whatever can change separator and file-name | 2375 ;; buffer/process/client/whatever can change separator and file-name |