comparison lisp/loadup.el @ 85710:beb909dfc54d

Rewrite abbrev.c in Elisp. * image.c (Qcount): Don't declare as extern. (syms_of_image): Initialize and staticpro `Qcount'. * puresize.h (BASE_PURESIZE): Increase for the new abbrev.el functions. * emacs.c (main): Don't call syms_of_abbrev. * Makefile.in (obj): Remove abbrev.o. (abbrev.o): Remove. * abbrev.c: Remove. Rewrite abbrev.c in Elisp. * abbrev.el (abbrev-mode): Move custom group from cus-edit.el. (abbrev-table-get, abbrev-table-put, abbrev-get) (abbrev-put, make-abbrev-table, abbrev-table-p, clear-abbrev-table) (define-abbrev, abbrev--check-chars, define-global-abbrev) (define-mode-abbrev, abbrev--active-tables, abbrev-symbol) (abbrev-expansion, abbrev--before-point, expand-abbrev) (unexpand-abbrev, abbrev--write, abbrev--describe) (insert-abbrev-table-description, define-abbrev-table): New funs, largely transcribed from abbrev.c. (abbrev-with-wrapper-hook): New macro. (abbrev-table-name-list, global-abbrev-table) (abbrev-minor-mode-table-alist, fundamental-mode-abbrev-table) (abbrevs-changed, abbrev-all-caps, abbrev-start-location) (abbrev-start-location-buffer, last-abbrev, last-abbrev-text) (last-abbrev-location, pre-abbrev-expand-hook, abbrev-expand-function): New vars, largely transcribed from abbrev.c. * cus-edit.el (abbrev-mode): Remove. Move to abbrev.el. * cus-start.el: Remove abbrev-all-caps and pre-abbrev-expand-hook. * loadup.el: Load "abbrev.el" before "lisp-mode.el".
author Stefan Monnier <monnier@iro.umontreal.ca>
date Sun, 28 Oct 2007 02:41:00 +0000
parents 0dcd1f3c9909
children 107ccd98fa12 880960b70474
comparison
equal deleted inserted replaced
85709:2dabdbde81e8 85710:beb909dfc54d
158 (load "paths.el") ;Don't get confused if someone compiled paths by mistake. 158 (load "paths.el") ;Don't get confused if someone compiled paths by mistake.
159 (load "emacs-lisp/lisp") 159 (load "emacs-lisp/lisp")
160 (load "textmodes/page") 160 (load "textmodes/page")
161 (load "register") 161 (load "register")
162 (load "textmodes/paragraphs") 162 (load "textmodes/paragraphs")
163 (load "abbrev") ;lisp-mode.el uses define-abbrev-table.
163 (load "emacs-lisp/lisp-mode") 164 (load "emacs-lisp/lisp-mode")
164 (load "textmodes/text-mode") 165 (load "textmodes/text-mode")
165 (load "textmodes/fill") 166 (load "textmodes/fill")
166 (message "%s" (garbage-collect)) 167 (message "%s" (garbage-collect))
167 168
168 (load "replace") 169 (load "replace")
169 (if (eq system-type 'vax-vms) 170 (if (eq system-type 'vax-vms)
170 (progn 171 (progn
171 (load "vmsproc"))) 172 (load "vmsproc")))
172 (load "abbrev")
173 (load "buff-menu") 173 (load "buff-menu")
174 174
175 (if (fboundp 'x-create-frame) 175 (if (fboundp 'x-create-frame)
176 (progn 176 (progn
177 (load "fringe") 177 (load "fringe")