1 new commit in XEmacs: https://bitbucket.org/xemacs/xemacs/commits/b803128e4209/ Changeset: b803128e4209 User: kehoea Date: 2017-05-30 19:30:25+00:00 Summary: Give the correct bounding keywords to #'parse-integer in #'about-xemacs lisp/ChangeLog addition: 2017-05-30 Aidan Kehoe <kehoea(a)parhasard.net&gt; * about.el (about-xemacs): Correct a recently-introduced bug here, give the correct bounding keywords to #'parse-integer when working out the month of the release date. Don't check for xemacs-extra-name, xemacs-release-date being #'boundp, we control src/emacs.c, and can ensure they always are. src/ChangeLog addition: 2017-05-30 Aidan Kehoe <kehoea(a)parhasard.net&gt; * emacs.c (vars_of_emacs): If there's no associated #define, initialise xemacs-extra-name to nil. Affected #: 4 files diff -r 5465cf0baa425adc8df3c11e14f9c3783c6bc702 -r b803128e420963ce405b3ac51c7f9a80183c496b lisp/ChangeLog --- a/lisp/ChangeLog +++ b/lisp/ChangeLog ＠＠ -1,3 +1,12 ＠＠ +2017-05-30 Aidan Kehoe <kehoea(a)parhasard.net&gt; + + * about.el (about-xemacs): + Correct a recently-introduced bug here, give the correct bounding + keywords to #'parse-integer when working out the month of the + release date. + Don't check for xemacs-extra-name, xemacs-release-date being + #'boundp, we control src/emacs.c, and can ensure they always are. + 2017-03-15 Aidan Kehoe <kehoea(a)parhasard.net&gt; * make-docfile.el: diff -r 5465cf0baa425adc8df3c11e14f9c3783c6bc702 -r b803128e420963ce405b3ac51c7f9a80183c496b lisp/about.el --- a/lisp/about.el +++ b/lisp/about.el ＠＠ -380,23 +380,20 ＠＠ emacs-major-version emacs-minor-version)))) (emacs-release-date - (if (and (boundp 'xemacs-release-date) - (stringp xemacs-release-date) - (string-match "^\\([0-9]\\{4\\}\\)-\\([0-9][0-9]\\)-" - xemacs-release-date)) + (if (string-match "^\\([0-9]\\{4\\}\\)-\\([0-9][0-9]\\)-" + xemacs-release-date) (format "%s %s" (aref [ "January" "February" "March" "April" "May" "June" "July" "August" "September" "October" "November" "December" ] (1- (parse-integer xemacs-release-date - :start (match-beginning 2)))) + :start (match-beginning 2) + :end (match-end 2)))) (match-string 1 xemacs-release-date)) "February 2005 (defaulted in about.el)")) - (emacs-variant-info (if (and xemacs-extra-name - (stringp xemacs-extra-name) - (< 0 (length xemacs-extra-name))) - (format " %s" xemacs-extra-name) - "")) + (emacs-variant-info (if (< 0 (length xemacs-extra-name)) + (concat " " xemacs-extra-name) + "")) (emacs-about-version (format "version %s of %s%s" emacs-short-version emacs-release-date diff -r 5465cf0baa425adc8df3c11e14f9c3783c6bc702 -r b803128e420963ce405b3ac51c7f9a80183c496b src/ChangeLog --- a/src/ChangeLog +++ b/src/ChangeLog ＠＠ -1,3 +1,9 ＠＠ +2017-05-30 Aidan Kehoe <kehoea(a)parhasard.net&gt; + + * emacs.c (vars_of_emacs): + If there's no associated #define, initialise xemacs-extra-name to + nil. + 2017-05-11 Aidan Kehoe <kehoea(a)parhasard.net&gt; * editfns.c (Fencode_time): diff -r 5465cf0baa425adc8df3c11e14f9c3783c6bc702 -r b803128e420963ce405b3ac51c7f9a80183c496b src/emacs.c --- a/src/emacs.c +++ b/src/emacs.c ＠＠ -4392,6 +4392,8 ＠＠ */ ); #ifdef XEMACS_EXTRA_NAME Vxemacs_extra_name = build_ascstring (XEMACS_EXTRA_NAME); +#else + Vxemacs_extra_name = Qnil; #endif DEFVAR_LISP ("xemacs-release-date", &Vxemacs_release_date /* Repository URL: https://bitbucket.org/xemacs/xemacs/ -- This is a commit notification from bitbucket.org. You are receiving this because you have the service enabled, addressing the recipient of this email.