Zekeriya KOÇ <[EMAIL PROTECTED]> writes:
> (define-abbrev sql-mode-abbrev-table "sel" "select * from" nil)
> (define-abbrev sql-mode-abbrev-table "sc" "select count(*) from" nil)
> (define-abbrev sql-mode-abbrev-table "co" "count(*)" nil)
> (define-abbrev sql-mode-abbrev-table "se" "select" nil)
> (define-abbrev sql-mode-abbrev-table "fr" "from" nil)
> (define-abbrev sql-mode-abbrev-table "gr" "group by" nil)
> (define-abbrev sql-mode-abbrev-table "od" "order by" nil)
> ...
Nacizane önerim, bu iş için fonksiyon kullanırsanız işiniz epey bir
kolaylaşır. Örneğin benim abbrev.el dosyamdan ufak bir alıntı:
(defun define-abbrev-list (table abbrev-specs)
(loop for spec in abbrev-specs
do (apply 'define-abbrev
(cons table spec))))
(define-abbrev-list
sql-mode-abbrev-table
'(("sel" "select ..." (lambda () ...) ...)
("fro" "from")
...))
Ek olarak, bildiğim kadarı ile DEFINE-ABBREV'in 4. argümanı isteğe
bağlı, o yüzden ayrıca nil olarak belirtmenize gerek yok.)
İyi çalışmalar.
_______________________________________________
cs-lisp mailing list
cs-lisp@cs.bilgi.edu.tr
http://church.cs.bilgi.edu.tr/lcg
http://cs.bilgi.edu.tr/mailman/listinfo/cs-lisp
