Mercurial > hg > xemacs-beta
comparison lisp/ChangeLog @ 5321:57a64ab2ae45
Implement some basic Lisp functions in terms of Common Lisp builtins.
2010-12-30 Aidan Kehoe <kehoea@parhasard.net>
* simple.el (assoc-ignore-case): Remove a duplicate definition of
this function (it's already in subr.el).
* iso8859-1.el (char-width):
On non-Mule, make this function equivalent to that produced by
(constantly 1), but preserve its docstring.
* subr.el (subst-char-in-string): Define this in terms of
#'substitute, #'nsubstitute.
(string-width): Define this using #'reduce and #'char-width.
(char-width): Give this a simpler definition, it makes far more
sense to check for mule at load time and redefine, as we do in
iso8859-1.el.
(store-substring): Implement this in terms of #'replace, now
#'replace is cheap.
author | Aidan Kehoe <kehoea@parhasard.net> |
---|---|
date | Thu, 30 Dec 2010 01:00:40 +0000 |
parents | ed5d4f081fa9 |
children | d0bb90d90736 d1b17a33450b |
comparison
equal
deleted
inserted
replaced
5320:31be2a3d121d | 5321:57a64ab2ae45 |
---|---|
1 2010-12-30 Aidan Kehoe <kehoea@parhasard.net> | |
2 | |
3 * simple.el (assoc-ignore-case): Remove a duplicate definition of | |
4 this function (it's already in subr.el). | |
5 * iso8859-1.el (char-width): | |
6 On non-Mule, make this function equivalent to that produced by | |
7 (constantly 1), but preserve its docstring. | |
8 * subr.el (subst-char-in-string): Define this in terms of | |
9 #'substitute, #'nsubstitute. | |
10 (string-width): Define this using #'reduce and #'char-width. | |
11 (char-width): Give this a simpler definition, it makes far more | |
12 sense to check for mule at load time and redefine, as we do in | |
13 iso8859-1.el. | |
14 (store-substring): Implement this in terms of #'replace, now | |
15 #'replace is cheap. | |
16 | |
1 2010-12-30 Aidan Kehoe <kehoea@parhasard.net> | 17 2010-12-30 Aidan Kehoe <kehoea@parhasard.net> |
2 | 18 |
3 * update-elc.el (lisp-files-needed-for-byte-compilation) | 19 * update-elc.el (lisp-files-needed-for-byte-compilation) |
4 (lisp-files-needing-early-byte-compilation): | 20 (lisp-files-needing-early-byte-compilation): |
5 cl-macs belongs in the former, not the latter, it is as | 21 cl-macs belongs in the former, not the latter, it is as |