mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-26 07:11:34 -08:00
Code Issues Projects Releases Wiki Activity

Trivial fixes for last changes to package.el and marker.c

Browse source 
* lisp/emacs-lisp/package.el (package-quickstart): Add missing version.
* src/marker.c (verify_bytepos): Fix typo.
This commit is contained in:
Stefan Monnier 2018-03-26 14:29:49 -04:00
parent 6247a904e6
commit c23f2b5d9e
2 changed files with 7 additions and 5 deletions
Download patch file Download diff file Expand all files Collapse all files

10
lisp/emacs-lisp/package.el
View file

@ -3460,19 +3460,21 @@ The list is displayed in a buffer named `*Packages*'."
;; package.el). ;; package.el).
;; Other than speeding things up, this also offers a bootstrap feature: ;; Other than speeding things up, this also offers a bootstrap feature:
;; it lets us activate packages according to package-load-list and ;; it lets us activate packages according to `package-load-list' and
;; package-user-dir even before those vars are set. ;; `package-user-dir' even before those vars are set.
(defcustom package-quickstart nil (defcustom package-quickstart nil
"Precompute activation actions to speed up startup. "Precompute activation actions to speed up startup.
This requires the use of `package-quickstart-refresh' every time the This requires the use of `package-quickstart-refresh' every time the
activations need to be changed, such as when `package-load-list' is modified." activations need to be changed, such as when `package-load-list' is modified."
:type 'boolean) :type 'boolean
:version "27.1")
(defcustom package-quickstart-file (defcustom package-quickstart-file
(locate-user-emacs-file "package-quickstart.el") (locate-user-emacs-file "package-quickstart.el")
"Location of the file used to speed up activation of packages at startup." "Location of the file used to speed up activation of packages at startup."
:type 'file) :type 'file
:version "27.1")
(defun package--quickstart-maybe-refresh () (defun package--quickstart-maybe-refresh ()
(if package-quickstart (if package-quickstart

2
src/marker.c
View file

@ -775,7 +775,7 @@ ptrdiff_t
verify_bytepos (ptrdiff_t charpos) verify_bytepos (ptrdiff_t charpos)
{ {
ptrdiff_t below = BEG; ptrdiff_t below = BEG;
ptrdiff_t below_byte = BYTE_BEG; ptrdiff_t below_byte = BEG_BYTE;
while (below != charpos) while (below != charpos)
{ {