September 2007 - XEmacs-Patches - XEmacs Mailing List Archives

[C] xemacs-21.5-clean: Introduce ftp.cn.xemacs.org 17 years

Adrian Aichner

COMMIT xemacs-21.5-clean ChangeLog patch: Diff command: cvs -q diff -U 0 Files affected: lisp/ChangeLog Index: lisp/ChangeLog =================================================================== RCS file: /pack/xemacscvs/XEmacs/xemacs/lisp/ChangeLog,v retrieving revision 1.840 diff -u -U0 -r1.840 ChangeLog --- lisp/ChangeLog 25 Sep 2007 21:21:08 -0000 1.840 +++ lisp/ChangeLog 26 Sep 2007 20:49:15 -0000 ＠＠ -0,0 +1,6 ＠＠ +2007-09-26 Adrian Aichner <adrian(a)xemacs.org> + + * package-get.el (package-get-download-sites): Introduce + ftp.cn.xemacs.org. + * package-get.el (package-get-pre-release-download-sites): Ditto. + xemacs-21.5-clean source patch: Diff command: cvs -f -z3 -q diff -u -w -N Files affected: lisp/package-get.el =================================================================== RCS Index: lisp/package-get.el =================================================================== RCS file: /pack/xemacscvs/XEmacs/xemacs/lisp/package-get.el,v retrieving revision 1.84 diff -u -w -r1.84 package-get.el --- lisp/package-get.el 25 Sep 2007 21:21:10 -0000 1.84 +++ lisp/package-get.el 26 Sep 2007 20:48:42 -0000 ＠＠ -225,7 +225,7 ＠＠ ;; with ;; xemacs-builds/adrian/website/package-get-2-download-sites.el ; ("Chile (cl.xemacs.org)" "ftp.cl.xemacs.org" "packages") - ("China (ftp.cn.postgresql.org)" "ftp.cn.postgresql.org" "pub/xemacs/packages") + ("China (ftp.cn.xemacs.org)" "ftp.cn.xemacs.org" "pub/xemacs/packages") ("Czech Republic (cz.xemacs.org)" "ftp.cz.xemacs.org" "MIRRORS/ftp.xemacs.org/pub/xemacs/packages") ("Denmark (dk.xemacs.org)" "ftp.dk.xemacs.org" "xemacs/packages") ("Finland (fi.xemacs.org)" "ftp.fi.xemacs.org" "pub/mirrors/ftp.xemacs.org/pub/tux/xemacs/packages") ＠＠ -298,7 +298,7 ＠＠ ;; xemacs-builds/adrian/website/package-get-2-download-sites.el ; ("Chile Pre-Releases (cl.xemacs.org)" "ftp.cl.xemacs.org" ; "beta/experimental/packages") - ("China Pre-Releases (ftp.cn.postgresql.org)" "ftp.cn.postgresql.org" + ("China Pre-Releases (ftp.cn.xemacs.org)" "ftp.cn.xemacs.org" "pub/xemacs/beta/experimental/packages") ("Czech Republic Pre-Releases (cz.xemacs.org)" "ftp.cz.xemacs.org" "MIRRORS/ftp.xemacs.org/pub/xemacs/xemacs-21.5/experimental/packages") -- Adrian Aichner mailto:adrian＠xemacs.org http://www.xemacs.org/ _______________________________________________ XEmacs-Patches mailing list XEmacs-Patches(a)xemacs.org http://calypso.tux.org/cgi-bin/mailman/listinfo/xemacs-patches

1 participants
0 comments

[PATCH] xemacs-21.5-clean: Introduce ftp.cn.xemacs.org 17 years

Adrian Aichner

xemacs-21.5-clean ChangeLog patch: Diff command: cvs -q diff -U 0 Files affected: lisp/ChangeLog Index: lisp/ChangeLog =================================================================== RCS file: /pack/xemacscvs/XEmacs/xemacs/lisp/ChangeLog,v retrieving revision 1.840 diff -u -U0 -r1.840 ChangeLog --- lisp/ChangeLog 25 Sep 2007 21:21:08 -0000 1.840 +++ lisp/ChangeLog 26 Sep 2007 20:49:15 -0000 ＠＠ -0,0 +1,6 ＠＠ +2007-09-26 Adrian Aichner <adrian(a)xemacs.org> + + * package-get.el (package-get-download-sites): Introduce + ftp.cn.xemacs.org. + * package-get.el (package-get-pre-release-download-sites): Ditto. + xemacs-21.5-clean source patch: Diff command: cvs -f -z3 -q diff -u -w -N Files affected: lisp/package-get.el =================================================================== RCS Index: lisp/package-get.el =================================================================== RCS file: /pack/xemacscvs/XEmacs/xemacs/lisp/package-get.el,v retrieving revision 1.84 diff -u -w -r1.84 package-get.el --- lisp/package-get.el 25 Sep 2007 21:21:10 -0000 1.84 +++ lisp/package-get.el 26 Sep 2007 20:48:42 -0000 ＠＠ -225,7 +225,7 ＠＠ ;; with ;; xemacs-builds/adrian/website/package-get-2-download-sites.el ; ("Chile (cl.xemacs.org)" "ftp.cl.xemacs.org" "packages") - ("China (ftp.cn.postgresql.org)" "ftp.cn.postgresql.org" "pub/xemacs/packages") + ("China (ftp.cn.xemacs.org)" "ftp.cn.xemacs.org" "pub/xemacs/packages") ("Czech Republic (cz.xemacs.org)" "ftp.cz.xemacs.org" "MIRRORS/ftp.xemacs.org/pub/xemacs/packages") ("Denmark (dk.xemacs.org)" "ftp.dk.xemacs.org" "xemacs/packages") ("Finland (fi.xemacs.org)" "ftp.fi.xemacs.org" "pub/mirrors/ftp.xemacs.org/pub/tux/xemacs/packages") ＠＠ -298,7 +298,7 ＠＠ ;; xemacs-builds/adrian/website/package-get-2-download-sites.el ; ("Chile Pre-Releases (cl.xemacs.org)" "ftp.cl.xemacs.org" ; "beta/experimental/packages") - ("China Pre-Releases (ftp.cn.postgresql.org)" "ftp.cn.postgresql.org" + ("China Pre-Releases (ftp.cn.xemacs.org)" "ftp.cn.xemacs.org" "pub/xemacs/beta/experimental/packages") ("Czech Republic Pre-Releases (cz.xemacs.org)" "ftp.cz.xemacs.org" "MIRRORS/ftp.xemacs.org/pub/xemacs/xemacs-21.5/experimental/packages") -- Adrian Aichner mailto:adrian＠xemacs.org http://www.xemacs.org/ _______________________________________________ XEmacs-Patches mailing list XEmacs-Patches(a)xemacs.org http://calypso.tux.org/cgi-bin/mailman/listinfo/xemacs-patches

1 participants
0 comments

[C] xemacsweb: Introduce ftp.cn.xemacs.org 17 years

Adrian Aichner

COMMIT Now that the ftp.cn.xemacs.org CNAME is in place let's use it. Adrian xemacsweb ChangeLog patch: Diff command: cvs -q diff -U 0 Files affected: Releases/ChangeLog Download/win32/ChangeLog ChangeLog Index: Releases/ChangeLog =================================================================== RCS file: /pack/xemacscvs/XEmacs/xemacsweb/Releases/ChangeLog,v retrieving revision 1.147 diff -u -U0 -r1.147 ChangeLog --- Releases/ChangeLog 25 Sep 2007 21:18:33 -0000 1.147 +++ Releases/ChangeLog 26 Sep 2007 20:41:06 -0000 ＠＠ -0,0 +1,7 ＠＠ +2007-09-26 Adrian Aichner <adrian(a)xemacs.org> + + * core-beta.txt: Introduce ftp.cn.xemacs.org. + * core-stable.txt: Ditto. + * packages-official.txt: Ditto. + * packages-pre-release.txt: Ditto. + Index: Download/win32/ChangeLog =================================================================== RCS file: /pack/xemacscvs/XEmacs/xemacsweb/Download/win32/ChangeLog,v retrieving revision 1.60 diff -u -U0 -r1.60 ChangeLog --- Download/win32/ChangeLog 25 Sep 2007 21:18:46 -0000 1.60 +++ Download/win32/ChangeLog 26 Sep 2007 20:41:06 -0000 ＠＠ -0,0 +1,6 ＠＠ +2007-09-26 Adrian Aichner <adrian(a)xemacs.org> + + * innosetup-win32.txt: Introduce ftp.cn.xemacs.org. + * installshield-win32.txt: Ditto. + * netinstall-win32.txt: Ditto. + Index: ChangeLog =================================================================== RCS file: /pack/xemacscvs/XEmacs/xemacsweb/ChangeLog,v retrieving revision 1.272 diff -u -U0 -r1.272 ChangeLog --- ChangeLog 25 Sep 2007 21:18:53 -0000 1.272 +++ ChangeLog 26 Sep 2007 20:41:06 -0000 ＠＠ -0,0 +1,4 ＠＠ +2007-09-26 Adrian Aichner <adrian(a)xemacs.org> + + * index.content: Introduce ftp.cn.xemacs.org. + xemacsweb source patch: Diff command: cvs -f -z3 -q diff -u -w -N Files affected: Releases/packages-pre-release.txt =================================================================== RCS Releases/packages-official.txt =================================================================== RCS Releases/core-stable.txt =================================================================== RCS Releases/core-beta.txt =================================================================== RCS Download/win32/netinstall-win32.txt =================================================================== RCS Download/win32/installshield-win32.txt =================================================================== RCS Download/win32/innosetup-win32.txt =================================================================== RCS index.content =================================================================== RCS Index: index.content =================================================================== RCS file: /pack/xemacscvs/XEmacs/xemacsweb/index.content,v retrieving revision 1.181 diff -u -w -r1.181 index.content --- index.content 25 Sep 2007 21:18:53 -0000 1.181 +++ index.content 26 Sep 2007 20:34:23 -0000 ＠＠ -116,7 +116,7 ＠＠ FKtPp and his friend have set up an XEmacs FTP Site mirror at <a - href="ftp://ftp.cn.postgresql.org/pub/xemacs/">ftp://ftp.cn.postgresql.or...>. + href="ftp://ftp.cn.xemacs.org/pub/xemacs/">ftp://ftp.cn.xemacs.org/pub/xe...>. XEmacs users in China now have a "local" mirror to download from! Thank you, FKtPp! Index: Download/win32/innosetup-win32.txt =================================================================== RCS file: /pack/xemacscvs/XEmacs/xemacsweb/Download/win32/innosetup-win32.txt,v retrieving revision 1.13 diff -u -w -r1.13 innosetup-win32.txt --- Download/win32/innosetup-win32.txt 25 Sep 2007 21:18:46 -0000 1.13 +++ Download/win32/innosetup-win32.txt 26 Sep 2007 20:34:23 -0000 ＠＠ -1,5 +1,5 ＠＠  ＠＠ -20,7 +20,7 ＠＠ <li><a href="http://ftp.ca.xemacs.org/pub/Mirror/xemacs/binaries/win32/InnoSetup... (ca.xemacs.org)</a></li> <li><a href="ftp://ftp.nrc.ca/pub/packages/editors/xemacs/binaries/win32/InnoSetup/XEmacs_Setup_21.4.20.exe">Canada (nrc.ca)</a></li> <li><a href="http://ftp.cl.xemacs.org/binaries/win32/InnoSetup/XEmacs_Setup_21.4... (cl.xemacs.org)</a></li> - <li><a href="ftp://ftp.cn.postgresql.org/pub/xemacs/binaries/win32/InnoSetup/XEm... (ftp.cn.postgresql.org)</a></li> + <li><a href="ftp://ftp.cn.xemacs.org/pub/xemacs/binaries/win32/InnoSetup/XEmacs_... (ftp.cn.xemacs.org)</a></li> <li><a href="http://ftp.cz.xemacs.org/MIRRORS/ftp.xemacs.org/pub/xemacs/binaries... Republic (cz.xemacs.org)</a></li> <li><a href="http://ftp.dk.xemacs.org/xemacs/binaries/win32/InnoSetup/XEmacs_Set... (dk.xemacs.org)</a></li> <li><a href="http://ftp.fi.xemacs.org/pub/mirrors/ftp.xemacs.org/pub/tux/xemacs/... (fi.xemacs.org)</a></li> Index: Download/win32/installshield-win32.txt =================================================================== RCS file: /pack/xemacscvs/XEmacs/xemacsweb/Download/win32/installshield-win32.txt,v retrieving revision 1.11 diff -u -w -r1.11 installshield-win32.txt --- Download/win32/installshield-win32.txt 25 Sep 2007 21:18:46 -0000 1.11 +++ Download/win32/installshield-win32.txt 26 Sep 2007 20:34:23 -0000 ＠＠ -1,5 +1,5 ＠＠  <a id="InstallShield-Download" ＠＠ -24,7 +24,7 ＠＠ <li><a href="http://ftp.ca.xemacs.org/pub/Mirror/xemacs/binaries/win32/installsh... (ca.xemacs.org)</a></li> <li><a href="ftp://ftp.nrc.ca/pub/packages/editors/xemacs/binaries/win32/installshield/xemacs-21.5.17.exe">Canada (nrc.ca)</a></li> <li><a href="http://ftp.cl.xemacs.org/binaries/win32/installshield/xemacs-21.5.1... (cl.xemacs.org)</a></li> - <li><a href="ftp://ftp.cn.postgresql.org/pub/xemacs/binaries/win32/installshield... (ftp.cn.postgresql.org)</a></li> + <li><a href="ftp://ftp.cn.xemacs.org/pub/xemacs/binaries/win32/installshield/xem... (ftp.cn.xemacs.org)</a></li> <li><a href="http://ftp.cz.xemacs.org/MIRRORS/ftp.xemacs.org/pub/xemacs/binaries... Republic (cz.xemacs.org)</a></li> <li><a href="http://ftp.dk.xemacs.org/xemacs/binaries/win32/installshield/xemacs... (dk.xemacs.org)</a></li> <li><a href="http://ftp.fi.xemacs.org/pub/mirrors/ftp.xemacs.org/pub/tux/xemacs/... (fi.xemacs.org)</a></li> Index: Download/win32/netinstall-win32.txt =================================================================== RCS file: /pack/xemacscvs/XEmacs/xemacsweb/Download/win32/netinstall-win32.txt,v retrieving revision 1.11 diff -u -w -r1.11 netinstall-win32.txt --- Download/win32/netinstall-win32.txt 25 Sep 2007 21:18:46 -0000 1.11 +++ Download/win32/netinstall-win32.txt 26 Sep 2007 20:34:23 -0000 ＠＠ -1,5 +1,5 ＠＠  ＠＠ -23,7 +23,7 ＠＠ <li><a href="http://ftp.ca.xemacs.org/pub/Mirror/xemacs/binaries/win32/netinstal... (ca.xemacs.org)</a></li> <li><a href="ftp://ftp.nrc.ca/pub/packages/editors/xemacs/binaries/win32/netinstall/xemacs-i586-pc-win32-21.4.13.tar.gz">Canada (nrc.ca)</a></li> <li><a href="http://ftp.cl.xemacs.org/binaries/win32/netinstall/xemacs-i586-pc-w... (cl.xemacs.org)</a></li> - <li><a href="ftp://ftp.cn.postgresql.org/pub/xemacs/binaries/win32/netinstall/xe... (ftp.cn.postgresql.org)</a></li> + <li><a href="ftp://ftp.cn.xemacs.org/pub/xemacs/binaries/win32/netinstall/xemacs... (ftp.cn.xemacs.org)</a></li> <li><a href="http://ftp.cz.xemacs.org/MIRRORS/ftp.xemacs.org/pub/xemacs/binaries... Republic (cz.xemacs.org)</a></li> <li><a href="http://ftp.dk.xemacs.org/xemacs/binaries/win32/netinstall/xemacs-i5... (dk.xemacs.org)</a></li> <li><a href="http://ftp.fi.xemacs.org/pub/mirrors/ftp.xemacs.org/pub/tux/xemacs/... (fi.xemacs.org)</a></li> Index: Releases/core-beta.txt =================================================================== RCS file: /pack/xemacscvs/XEmacs/xemacsweb/Releases/core-beta.txt,v retrieving revision 1.14 diff -u -w -r1.14 core-beta.txt --- Releases/core-beta.txt 25 Sep 2007 21:18:33 -0000 1.14 +++ Releases/core-beta.txt 26 Sep 2007 20:34:23 -0000 ＠＠ -1,5 +1,5 ＠＠  ＠＠ -20,7 +20,7 ＠＠ <li><a href="http://ftp.ca.xemacs.org/pub/Mirror/xemacs/beta">Canada (ca.xemacs.org)</a></li> <li><a href="ftp://ftp.nrc.ca/pub/packages/editors/xemacs/beta">Canada (nrc.ca)</a></li> <li><a href="http://ftp.cl.xemacs.org/beta">Chile (cl.xemacs.org)</a></li> - <li><a href="ftp://ftp.cn.postgresql.org/pub/xemacs/beta">China (ftp.cn.postgresql.org)</a></li> + <li><a href="ftp://ftp.cn.xemacs.org/pub/xemacs/beta">China (ftp.cn.xemacs.org)</a></li> <li><a href="http://ftp.cz.xemacs.org/MIRRORS/ftp.xemacs.org/pub/xemacs/xemacs-2... Republic (cz.xemacs.org)</a></li> <li><a href="http://ftp.dk.xemacs.org/xemacs/beta">Denmark (dk.xemacs.org)</a></li> <li><a href="http://ftp.fi.xemacs.org/pub/mirrors/ftp.xemacs.org/pub/tux/xemacs/... (fi.xemacs.org)</a></li> Index: Releases/core-stable.txt =================================================================== RCS file: /pack/xemacscvs/XEmacs/xemacsweb/Releases/core-stable.txt,v retrieving revision 1.14 diff -u -w -r1.14 core-stable.txt --- Releases/core-stable.txt 25 Sep 2007 21:18:33 -0000 1.14 +++ Releases/core-stable.txt 26 Sep 2007 20:34:23 -0000 ＠＠ -1,5 +1,5 ＠＠  ＠＠ -20,7 +20,7 ＠＠ <li><a href="http://ftp.ca.xemacs.org/pub/Mirror/xemacs/stable">Canada (ca.xemacs.org)</a></li> <li><a href="ftp://ftp.nrc.ca/pub/packages/editors/xemacs/stable">Canada (nrc.ca)</a></li> <li><a href="http://ftp.cl.xemacs.org/packages">Chile (cl.xemacs.org)</a></li> - <li><a href="ftp://ftp.cn.postgresql.org/pub/xemacs/stable">China (ftp.cn.postgresql.org)</a></li> + <li><a href="ftp://ftp.cn.xemacs.org/pub/xemacs/stable">China (ftp.cn.xemacs.org)</a></li> <li><a href="http://ftp.cz.xemacs.org/MIRRORS/ftp.xemacs.org/pub/xemacs/stable">... Republic (cz.xemacs.org)</a></li> <li><a href="http://ftp.dk.xemacs.org/xemacs/stable">Denmark (dk.xemacs.org)</a></li> <li><a href="http://ftp.fi.xemacs.org/pub/mirrors/ftp.xemacs.org/pub/tux/xemacs/... (fi.xemacs.org)</a></li> Index: Releases/packages-official.txt =================================================================== RCS file: /pack/xemacscvs/XEmacs/xemacsweb/Releases/packages-official.txt,v retrieving revision 1.14 diff -u -w -r1.14 packages-official.txt --- Releases/packages-official.txt 25 Sep 2007 21:18:34 -0000 1.14 +++ Releases/packages-official.txt 26 Sep 2007 20:34:23 -0000 ＠＠ -1,5 +1,5 ＠＠  ＠＠ -23,7 +23,7 ＠＠ <li><a href="http://ftp.ca.xemacs.org/pub/Mirror/xemacs/packages">Canada (ca.xemacs.org)</a></li> <li><a href="ftp://ftp.nrc.ca/pub/packages/editors/xemacs/packages">Canada (nrc.ca)</a></li> <li><a href="http://ftp.cl.xemacs.org/packages">Chile (cl.xemacs.org)</a></li> - <li><a href="ftp://ftp.cn.postgresql.org/pub/xemacs/packages">China (ftp.cn.postgresql.org)</a></li> + <li><a href="ftp://ftp.cn.xemacs.org/pub/xemacs/packages">China (ftp.cn.xemacs.org)</a></li> <li><a href="http://ftp.cz.xemacs.org/MIRRORS/ftp.xemacs.org/pub/xemacs/packages... Republic (cz.xemacs.org)</a></li> <li><a href="http://ftp.dk.xemacs.org/xemacs/packages">Denmark (dk.xemacs.org)</a></li> <li><a href="http://ftp.fi.xemacs.org/pub/mirrors/ftp.xemacs.org/pub/tux/xemacs/... (fi.xemacs.org)</a></li> Index: Releases/packages-pre-release.txt =================================================================== RCS file: /pack/xemacscvs/XEmacs/xemacsweb/Releases/packages-pre-release.txt,v retrieving revision 1.14 diff -u -w -r1.14 packages-pre-release.txt --- Releases/packages-pre-release.txt 25 Sep 2007 21:18:34 -0000 1.14 +++ Releases/packages-pre-release.txt 26 Sep 2007 20:34:23 -0000 ＠＠ -1,5 +1,5 ＠＠  ＠＠ -23,7 +23,7 ＠＠ <li><a href="http://ftp.ca.xemacs.org/pub/Mirror/xemacs/beta/experimental/packag... Pre-Releases (ca.xemacs.org)</a></li> <li><a href="ftp://ftp.nrc.ca/pub/packages/editors/xemacs/beta/experimental/packages">Canada Pre-Releases (nrc.ca)</a></li> <li><a href="http://ftp.cl.xemacs.org/beta/experimental/packages">Chile Pre-Releases (cl.xemacs.org)</a></li> - <li><a href="ftp://ftp.cn.postgresql.org/pub/xemacs/beta/experimental/packages">... Pre-Releases (ftp.cn.postgresql.org)</a></li> + <li><a href="ftp://ftp.cn.xemacs.org/pub/xemacs/beta/experimental/packages">China Pre-Releases (ftp.cn.xemacs.org)</a></li> <li><a href="http://ftp.cz.xemacs.org/MIRRORS/ftp.xemacs.org/pub/xemacs/xemacs-2... Republic Pre-Releases (cz.xemacs.org)</a></li> <li><a href="http://ftp.dk.xemacs.org/xemacs/beta/experimental/packages">Denmark Pre-Releases (dk.xemacs.org)</a></li> <li><a href="http://ftp.fi.xemacs.org/pub/mirrors/ftp.xemacs.org/pub/tux/xemacs/... Pre-Releases (fi.xemacs.org)</a></li> -- Adrian Aichner mailto:adrian＠elisp.de _______________________________________________ XEmacs-Patches mailing list XEmacs-Patches(a)xemacs.org http://calypso.tux.org/cgi-bin/mailman/listinfo/xemacs-patches

1 participants
0 comments

[AC] More fixes about face indexes 17 years

Didier Verna

NOTE: This patch has been committed. The version below is informational only (whitespace differences have been removed). Dear reviewers, here are more fixes similar to the ones in my previous patch. src/ChangeLog addition: 2007-09-26 Didier Verna <didier(a)xemacs.org> More fixes similar to previous patch: * faces.c (reset_face_cachels): Add informative comment about the order of faces cache addition. * redisplay.h: Ditto. * redisplay-output.c (output_display_line): Don't rely on DEFAULT_INDEX being 0. * redisplay.c (create_string_text_block): Ditto. XEmacs source patch: Diff command: cvs -q diff -u -t -b -B -w Files affected: src/redisplay.h src/redisplay.c src/redisplay-output.c src/faces.c Index: src/faces.c =================================================================== RCS file: /pack/xemacscvs/XEmacs/xemacs/src/faces.c,v retrieving revision 1.55 diff -u -u -t -b -B -w -r1.55 faces.c --- src/faces.c 22 Apr 2007 19:58:59 -0000 1.55 +++ src/faces.c 26 Sep 2007 13:24:16 -0000 ＠＠ -1592,6 +1592,10 ＠＠ Dynarr_free (cachel->merged_faces); } Dynarr_reset (w->face_cachels); + /* #### NOTE: be careful with the order ! + The cpp macros DEFAULT_INDEX and MODELINE_INDEX defined in + redisplay.h depend on the code below, which is really clumsy. + -- dvl */ get_builtin_face_cache_index (w, Vdefault_face); get_builtin_face_cache_index (w, Vmodeline_face); XFRAME (w->frame)->window_face_cache_reset = 1; Index: src/redisplay-output.c =================================================================== RCS file: /pack/xemacscvs/XEmacs/xemacs/src/redisplay-output.c,v retrieving revision 1.27 diff -u -u -t -b -B -w -r1.27 redisplay-output.c --- src/redisplay-output.c 27 Jun 2006 22:59:40 -0000 1.27 +++ src/redisplay-output.c 26 Sep 2007 13:24:16 -0000 ＠＠ -795,18 +795,19 ＠＠ if (x < ddl->bounds.left_in) { - findex = ddl->left_margin_findex ? + findex = (ddl->left_margin_findex > DEFAULT_INDEX) ? ddl->left_margin_findex : get_builtin_face_cache_index (w, Vleft_margin_face); } else if (x < ddl->bounds.right_in) { - /* no check here because DEFAULT_INDEX == 0 anyway */ - findex = ddl->default_findex; + findex = (ddl->default_findex >= DEFAULT_INDEX) ? + ddl->default_findex +: DEFAULT_INDEX; } else if (x < ddl->bounds.right_out) { - findex = ddl->right_margin_findex ? + findex = (ddl->right_margin_findex > DEFAULT_INDEX) ? ddl->right_margin_findex : get_builtin_face_cache_index (w, Vright_margin_face); } Index: src/redisplay.c =================================================================== RCS file: /pack/xemacscvs/XEmacs/xemacs/src/redisplay.c,v retrieving revision 1.101 diff -u -u -t -b -B -w -r1.101 redisplay.c --- src/redisplay.c 5 Nov 2006 22:31:45 -0000 1.101 +++ src/redisplay.c 26 Sep 2007 13:24:17 -0000 ＠＠ -4680,10 +4680,9 ＠＠ dl->num_chars = 0; dl->line_continuation = 0; - /* set up faces to use for clearing areas, used by - output_display_line */ + /* Set up faces to use for clearing areas, used by output_display_line. */ dl->default_findex = default_face; - if (default_face) + if (default_face > DEFAULT_INDEX) { dl->left_margin_findex = default_face; dl->right_margin_findex = default_face; Index: src/redisplay.h =================================================================== RCS file: /pack/xemacscvs/XEmacs/xemacs/src/redisplay.h,v retrieving revision 1.23 diff -u -u -t -b -B -w -r1.23 redisplay.h --- src/redisplay.h 9 Mar 2005 19:47:41 -0000 1.23 +++ src/redisplay.h 26 Sep 2007 13:24:17 -0000 ＠＠ -81,6 +81,8 ＠＠ #define NEXT_CURSOR 3 #define IGNORE_CURSOR 4 +/* #### NOTE: these indexes depend on the order in which the faces are added + to the cache in the function reset_face_cachels. */ #define DEFAULT_INDEX (face_index) 0 #define MODELINE_INDEX (face_index) 1 -- New ＠-quartet featured CD Review !! http://www.indie-music.com/modules.php?name=News&file=article&sid=6457 Didier Verna, didier(a)lrde.epita.fr, http://www.lrde.epita.fr/~didier EPITA / LRDE, 14-16 rue Voltaire Tel.+33 (1) 44 08 01 85 94276 Le Kremlin-Bicêtre, France Fax.+33 (1) 53 14 59 22 didier(a)xemacs.org _______________________________________________ XEmacs-Patches mailing list XEmacs-Patches(a)xemacs.org http://calypso.tux.org/cgi-bin/mailman/listinfo/xemacs-patches

2 participants
1 comments

[AC] Don't assume DEFAULT_INDEX will always be 0 17 years

Didier Verna

NOTE: This patch has been committed. The version below is informational only (whitespace differences have been removed). Dear reviewers, here's a small cleanness fix to gutter.c src/ChangeLog addition: 2007-09-26 Didier Verna <didier(a)xemacs.org> * gutter.c (calculate_gutter_size): Don't hardwire face index to 0: use DEFAULT_INDEX instead. XEmacs source patch: Diff command: cvs -q diff -u -t -b -B -w Files affected: src/gutter.c Index: src/gutter.c =================================================================== RCS file: /pack/xemacscvs/XEmacs/xemacs/src/gutter.c,v retrieving revision 1.19 diff -u -u -t -b -B -w -r1.19 gutter.c --- src/gutter.c 25 Oct 2005 11:16:25 -0000 1.19 +++ src/gutter.c 26 Sep 2007 09:31:32 -0000 ＠＠ -365,7 +365,7 ＠＠ - FRAME_LEFT_BORDER_END (f), FRAME_BOTTOM_BORDER_START (f) - FRAME_TOP_BORDER_END (f), - ddla, 0, 0); + ddla, 0, DEFAULT_INDEX); /* Let GC happen again. */ exit_redisplay_critical_section (count); -- New ＠-quartet featured CD Review !! http://www.indie-music.com/modules.php?name=News&file=article&sid=6457 Didier Verna, didier(a)lrde.epita.fr, http://www.lrde.epita.fr/~didier EPITA / LRDE, 14-16 rue Voltaire Tel.+33 (1) 44 08 01 85 94276 Le Kremlin-Bicêtre, France Fax.+33 (1) 53 14 59 22 didier(a)xemacs.org _______________________________________________ XEmacs-Patches mailing list XEmacs-Patches(a)xemacs.org http://calypso.tux.org/cgi-bin/mailman/listinfo/xemacs-patches

1 participants
0 comments

[PATCH 21.5] assert_failed should not return 17 years

Jerry James

PATCH 21.5 I am sending this to xemacs-beta as well as xemacs-patches because I expect that not everyone will be totally sanguine about this patch. Nevertheless, I think it is a good idea. Here is the rationale. With the current code, the assert() macro can return even when its argument evaluates to false. This can happen if fatal_error_in_progress is true when assert_failed() is entered. Somewhere back in the mists of time, somebody had the idea that we shouldn't shut down in that case, because user data might be lost. Guess what? It's lost anyway. If we return from assert_failed(), then the universe makes no sense to the code that called assert(). We just determined that an assumption that code relies on does not hold. Anything can happen. In many cases, that "anything" is a segfault. My contention is that assert_failed() should not return under ANY circumstances, otherwise we're heading into random behavior land. FWIW, emacs behaves in the way I consider sensible. If you trigger an assertion failure while already handling an assertion failure or fatal error, emacs shuts down immediately. I'm not entirely certain that returning from a failed assert is the highly dubious kludge to which Jamie refers; if anyone knows otherwise, I'll leave those comments in place. src/ChangeLog addition: 2007-09-24 Jerry James <james(a)xemacs.org> * lisp.h: Declare that assert_failed does not return. Drop unnecessary declaration of really_abort. * emacs.c: Ditto. * emacs.c (assert_failed): Don't return when fatal_error_in_progress. Just exit. xemacs-21.5 source patch: Diff command: cvs -q diff -uN Files affected: src/emacs.c =================================================================== RCS src/lisp.h =================================================================== RCS Index: src/lisp.h =================================================================== RCS file: /pack/xemacscvs/XEmacs/xemacs/src/lisp.h,v retrieving revision 1.148 diff -d -u -r1.148 lisp.h --- src/lisp.h 2007/08/21 20:32:37 1.148 +++ src/lisp.h 2007/09/25 03:11:16 ＠＠ -1037,16 +1037,12 ＠＠ time the assert checks take is measurable so let's not include them in production binaries. - If ASSERTIONS_DONT_ABORT defined, we will continue after assertion - failures. - assert_at_line() is used for asserts inside of inline functions called from error-checking macros. If we're not tricky, we just get the file and line of the inline function, which is not very useful. */ -/* Highly dubious kludge */ -/* (thanks, Jamie, I feel better now -- ben) */ -MODULE_API void assert_failed (const Ascbyte *, int, const Ascbyte *); +MODULE_API DECLARE_DOESNT_RETURN (assert_failed (const Ascbyte *, int, + const Ascbyte *)); #define ABORT() (assert_failed (__FILE__, __LINE__, "ABORT()")) #ifdef USE_ASSERTIONS ＠＠ -4244,7 +4240,6 ＠＠ extern int suppress_early_error_handler_backtrace; void debug_break (void); int debug_can_access_memory (void *ptr, Bytecount len); -DECLARE_DOESNT_RETURN (really_abort (void)); void zero_out_command_line_status_vars (void); /* Defined in emodules.c */ Index: src/emacs.c =================================================================== RCS file: /pack/xemacscvs/XEmacs/xemacs/src/emacs.c,v retrieving revision 1.168 diff -d -u -r1.168 emacs.c --- src/emacs.c 2006/06/21 17:30:36 1.168 +++ src/emacs.c 2007/09/25 03:11:17 ＠＠ -3885,13 +3885,6 ＠＠ /* abnormal shutdowns: assertion failures */ /* -------------------------------------- */ -/* This flag is useful to define if you're under a debugger; this way, you - can put a breakpoint of assert_failed() and debug multiple problems - in one session without having to recompile. */ -/* #define ASSERTIONS_DONT_ABORT */ - -/* This highly dubious kludge ... shut up Jamie, I'm tired of your slagging. */ - /* Nonzero if handling an assertion failure. (Bumped by one each time we recursively hit such a failure.) */ static int in_assert_failed; ＠＠ -3907,20 +3900,15 ＠＠ /* This is called when an assert() fails or when ABORT() is called -- both of those are defined in the preprocessor to an expansion involving assert_failed(). */ -void +DOESNT_RETURN assert_failed (const Ascbyte *file, int line, const Ascbyte *expr) { - /* If we're already crashing, let's not crash again. This might be - critical to getting auto-saving working properly. */ - if (fatal_error_in_progress) - return; - /* We are extremely paranoid so we sensibly deal with recursive assertion failures. */ in_assert_failed++; inhibit_non_essential_conversion_operations = 1; - if (in_assert_failed >= 4) + if (fatal_error_in_progress || in_assert_failed >= 4) _exit (-1); else if (in_assert_failed == 3) { ＠＠ -3958,7 +3946,6 ＠＠ get the auto-save behavior, which may be extremely important if you were in the middle of doing something */ /* debugging_breakpoint (); */ -#if !defined (ASSERTIONS_DONT_ABORT) #if defined (_MSC_VER) || defined (CYGWIN) /* In VC++, calling abort() directly just seems to exit, in a way we can't trap. (#### The docs say it does raise (SIGABRT), which we should be ＠＠ -3982,12 +3969,8 ＠＠ * ((int *) 0) = 666; /* RaiseException (STATUS_ASSERTION_FAILURE, EXCEPTION_NONCONTINUABLE, 0, 0); */ -#else - really_abort (); #endif /* defined (_MSC_VER) || defined (CYGWIN) */ -#endif /* !defined (ASSERTIONS_DONT_ABORT) */ - inhibit_non_essential_conversion_operations = 0; - in_assert_failed = 0; + abort (); } /* -------------------------------------- */ ＠＠ -4686,9 +4669,3 ＠＠ } #endif - -DOESNT_RETURN -really_abort (void) -{ - abort (); -} -- Jerry James http://loganjerry.googlepages.com/ _______________________________________________ XEmacs-Patches mailing list XEmacs-Patches(a)xemacs.org http://calypso.tux.org/cgi-bin/mailman/listinfo/xemacs-patches

3 participants
3 comments

[PATCH] xemacs-builds: Add ftp.cn.postgresql.org to list of ftp-only hosts 17 years

Adrian Aichner

xemacs-builds ChangeLog patch: Diff command: cvs -q diff -U 0 Files affected: ChangeLog Index: ChangeLog =================================================================== RCS file: /pack/xemacscvs/XEmacs/xemacs-builds/ChangeLog,v retrieving revision 1.80 diff -u -U0 -r1.80 ChangeLog --- ChangeLog 20 Aug 2007 21:51:17 -0000 1.80 +++ ChangeLog 25 Sep 2007 21:25:45 -0000 ＠＠ -0,0 +1,6 ＠＠ +2007-09-25 Adrian Aichner <adrian(a)xemacs.org> + + * adrian/website/package-get-2-download-sites.el + (package-get-2-download-sites-ftp-only-regexp): Add + ftp.cn.postgresql.org. + xemacs-builds source patch: Diff command: cvs -f -z3 -q diff -u -w -N Files affected: adrian/website/package-get-2-download-sites.el =================================================================== RCS Index: adrian/website/package-get-2-download-sites.el =================================================================== RCS file: /pack/xemacscvs/XEmacs/xemacs-builds/adrian/website/package-get-2-download-sites.el,v retrieving revision 1.13 diff -u -w -r1.13 package-get-2-download-sites.el --- adrian/website/package-get-2-download-sites.el 20 Aug 2007 21:51:20 -0000 1.13 +++ adrian/website/package-get-2-download-sites.el 25 Sep 2007 21:23:48 -0000 ＠＠ -27,6 +27,7 ＠＠ (defconst package-get-2-download-sites-ftp-only-regexp (regexp-opt '( + "ftp.cn.postgresql.org" "ftp.nrc.ca" "ftp.pasteur.fr" "mirror.cict.fr" -- Adrian Aichner mailto:adrian＠xemacs.org http://www.xemacs.org/ _______________________________________________ XEmacs-Patches mailing list XEmacs-Patches(a)xemacs.org http://calypso.tux.org/cgi-bin/mailman/listinfo/xemacs-patches

1 participants
1 comments

[C] xemacs-21.5-clean: Add new mirrors in The Netherlands and China 17 years

Adrian Aichner

COMMIT An XEmacs FTP site mirror in China, neat! The Netherlands even get both web and ftp site mirrors! Adrian xemacs-21.5-clean ChangeLog patch: Diff command: cvs -q diff -U 0 Files affected: lisp/ChangeLog Index: lisp/ChangeLog =================================================================== RCS file: /pack/xemacscvs/XEmacs/xemacs/lisp/ChangeLog,v retrieving revision 1.839 diff -u -U0 -r1.839 ChangeLog --- lisp/ChangeLog 20 Sep 2007 21:18:33 -0000 1.839 +++ lisp/ChangeLog 25 Sep 2007 21:20:07 -0000 ＠＠ -0,0 +1,6 ＠＠ +2007-09-25 Adrian Aichner <adrian(a)xemacs.org> + + * package-get.el (package-get-download-sites): Add new mirrors in + The Netherlands and China. + * package-get.el (package-get-pre-release-download-sites): Ditto. + xemacs-21.5-clean source patch: Diff command: cvs -f -z3 -q diff -u -w -N Files affected: lisp/package-get.el =================================================================== RCS Index: lisp/package-get.el =================================================================== RCS file: /pack/xemacscvs/XEmacs/xemacs/lisp/package-get.el,v retrieving revision 1.83 diff -u -w -r1.83 package-get.el --- lisp/package-get.el 3 Sep 2007 13:16:44 -0000 1.83 +++ lisp/package-get.el 25 Sep 2007 20:47:37 -0000 ＠＠ -225,6 +225,7 ＠＠ ;; with ;; xemacs-builds/adrian/website/package-get-2-download-sites.el ; ("Chile (cl.xemacs.org)" "ftp.cl.xemacs.org" "packages") + ("China (ftp.cn.postgresql.org)" "ftp.cn.postgresql.org" "pub/xemacs/packages") ("Czech Republic (cz.xemacs.org)" "ftp.cz.xemacs.org" "MIRRORS/ftp.xemacs.org/pub/xemacs/packages") ("Denmark (dk.xemacs.org)" "ftp.dk.xemacs.org" "xemacs/packages") ("Finland (fi.xemacs.org)" "ftp.fi.xemacs.org" "pub/mirrors/ftp.xemacs.org/pub/tux/xemacs/packages") ＠＠ -243,6 +244,10 ＠＠ ; ("Japan (nucba.ac.jp)" "mirror.nucba.ac.jp" "mirror/xemacs/packages") ("Korea (kr.xemacs.org)" "ftp.kr.xemacs.org" "pub/tools/emacs/xemacs/packages") ("Netherlands (nl.xemacs.org)" "ftp.nl.xemacs.org" "pub/xemacs/ftp/packages") + ;; no anonymous ftp available, uncomment when updating website + ;; with + ;; xemacs-builds/adrian/website/package-get-2-download-sites.el +; ("Netherlands (xemacsftp.digimirror.nl)" "xemacsftp.digimirror.nl" "packages") ("Norway (no.xemacs.org)" "ftp.no.xemacs.org" "pub/xemacs/packages") ("Portugal (pt.xemacs.org)" "ftp.pt.xemacs.org" "pub/MIRRORS/ftp.xemacs.org/packages") ("Russia (ru.xemacs.org)" "ftp.ru.xemacs.org" "pub/emacs/xemacs/packages") ＠＠ -280,7 +285,7 ＠＠ "pub/xemacs/beta/experimental/packages") ("Austria Pre-Releases (at.xemacs.org)" "ftp.at.xemacs.org" "editors/xemacs/beta/experimental/packages") - ("Belgium (be.xemacs.org)" "ftp.be.xemacs.org" + ("Belgium Pre-Releases (be.xemacs.org)" "ftp.be.xemacs.org" "xemacs/beta/experimental/packages") ("Brazil Pre-Releases (br.xemacs.org)" "ftp.br.xemacs.org" "pub/xemacs/xemacs-21.5/experimental/packages") ＠＠ -293,6 +298,8 ＠＠ ;; xemacs-builds/adrian/website/package-get-2-download-sites.el ; ("Chile Pre-Releases (cl.xemacs.org)" "ftp.cl.xemacs.org" ; "beta/experimental/packages") + ("China Pre-Releases (ftp.cn.postgresql.org)" "ftp.cn.postgresql.org" + "pub/xemacs/beta/experimental/packages") ("Czech Republic Pre-Releases (cz.xemacs.org)" "ftp.cz.xemacs.org" "MIRRORS/ftp.xemacs.org/pub/xemacs/xemacs-21.5/experimental/packages") ("Denmark Pre-Releases (dk.xemacs.org)" "ftp.dk.xemacs.org" ＠＠ -323,17 +330,22 ＠＠ ; "pub/GNU/xemacs/beta/experimental/packages") ("Japan Pre-Releases (jp.xemacs.org)" "ftp.jp.xemacs.org" "pub/text/xemacs/beta/experimental/packages") - ("Korea (kr.xemacs.org)" "ftp.kr.xemacs.org" + ("Korea Pre-Releases (kr.xemacs.org)" "ftp.kr.xemacs.org" "pub/tools/emacs/xemacs/beta/experimental/packages") - ("Netherlands (nl.xemacs.org)" "ftp.nl.xemacs.org" + ("Netherlands Pre-Releases (nl.xemacs.org)" "ftp.nl.xemacs.org" "pub/xemacs/ftp/beta/experimental/packages") + ;; no anonymous ftp available, uncomment when updating website + ;; with + ;; xemacs-builds/adrian/website/package-get-2-download-sites.el +; ("Netherlands Pre-Releases (xemacsftp.digimirror.nl)" "xemacsftp.digimirror.nl" +; "beta/experimental/packages") ("Norway Pre-Releases (no.xemacs.org)" "ftp.no.xemacs.org" "pub/xemacs/beta/experimental/packages") ("Portugal Pre-Releases (pt.xemacs.org)" "ftp.pt.xemacs.org" "pub/MIRRORS/ftp.xemacs.org/beta/experimental/packages") ("Russia Pre-Releases (ru.xemacs.org)" "ftp.ru.xemacs.org" "pub/emacs/xemacs/beta/experimental/packages") - ("Saudi Arabia (sa.xemacs.org)" "ftp.sa.xemacs.org" + ("Saudi Arabia Pre-Releases (sa.xemacs.org)" "ftp.sa.xemacs.org" "pub/xemacs.org/beta/experimental/packages") ("Sweden Pre-Releases (se.xemacs.org)" "ftp.se.xemacs.org" "pub/gnu/xemacs/beta/experimental/packages") -- Adrian Aichner mailto:adrian＠xemacs.org http://www.xemacs.org/ _______________________________________________ XEmacs-Patches mailing list XEmacs-Patches(a)xemacs.org http://calypso.tux.org/cgi-bin/mailman/listinfo/xemacs-patches

1 participants
0 comments

[C] xemacsweb: New mirrors in China and The Netherlands! 17 years

Adrian Aichner

COMMIT Thanks for setting up these mirrors! Best regards! Adrian xemacsweb ChangeLog patch: Diff command: cvs -q diff -U 0 Files affected: Releases/ChangeLog Download/win32/ChangeLog ChangeLog Index: Releases/ChangeLog =================================================================== RCS file: /pack/xemacscvs/XEmacs/xemacsweb/Releases/ChangeLog,v retrieving revision 1.146 diff -u -U0 -r1.146 ChangeLog --- Releases/ChangeLog 20 Aug 2007 19:21:27 -0000 1.146 +++ Releases/ChangeLog 25 Sep 2007 21:14:45 -0000 ＠＠ -0,0 +1,7 ＠＠ +2007-09-25 Adrian Aichner <adrian(a)xemacs.org> + + * core-beta.txt: New mirrors in China and The Netherlands! + * core-stable.txt: Ditto. + * packages-official.txt: Ditto. + * packages-pre-release.txt: Ditto. + Index: Download/win32/ChangeLog =================================================================== RCS file: /pack/xemacscvs/XEmacs/xemacsweb/Download/win32/ChangeLog,v retrieving revision 1.59 diff -u -U0 -r1.59 ChangeLog --- Download/win32/ChangeLog 20 Aug 2007 19:21:54 -0000 1.59 +++ Download/win32/ChangeLog 25 Sep 2007 21:14:45 -0000 ＠＠ -0,0 +1,6 ＠＠ +2007-09-25 Adrian Aichner <adrian(a)xemacs.org> + + * innosetup-win32.txt: New mirrors in China and The Netherlands! + * installshield-win32.txt: Ditto. + * netinstall-win32.txt: Ditto. + Index: ChangeLog =================================================================== RCS file: /pack/xemacscvs/XEmacs/xemacsweb/ChangeLog,v retrieving revision 1.271 diff -u -U0 -r1.271 ChangeLog --- ChangeLog 15 Sep 2007 18:27:20 -0000 1.271 +++ ChangeLog 25 Sep 2007 21:14:45 -0000 ＠＠ -0,0 +1,4 ＠＠ +2007-09-25 Adrian Aichner <adrian(a)xemacs.org> + + * index.content: New mirrors in China and The Netherlands! + xemacsweb source patch: Diff command: cvs -f -z3 -q diff -u -w -N Files affected: Releases/packages-pre-release.txt =================================================================== RCS Releases/packages-official.txt =================================================================== RCS Releases/core-stable.txt =================================================================== RCS Releases/core-beta.txt =================================================================== RCS Download/win32/netinstall-win32.txt =================================================================== RCS Download/win32/installshield-win32.txt =================================================================== RCS Download/win32/innosetup-win32.txt =================================================================== RCS index.content =================================================================== RCS Index: index.content =================================================================== RCS file: /pack/xemacscvs/XEmacs/xemacsweb/index.content,v retrieving revision 1.180 diff -u -w -r1.180 index.content --- index.content 15 Sep 2007 18:27:20 -0000 1.180 +++ index.content 25 Sep 2007 20:52:35 -0000 ＠＠ -111,6 +111,29 ＠＠ <dl>  + <dt>2007-09-24</dt> + <dd> + + FKtPp and his friend have set up an XEmacs FTP Site mirror at + <a + href="ftp://ftp.cn.postgresql.org/pub/xemacs/">ftp://ftp.cn.postgresql.or...>. + XEmacs users in China now have a "local" mirror to download + from! Thank you, FKtPp! + + </dd> +  + <dt>2007-09-12</dt> + <dd> + + <a href="http://www.digimirror.nl/">digimirror</a> of the + Netherlands have created mirrors of the XEmacs Website at <a + href="http://xemacs.digimirror.nl/">http://xemacs.digimirror.nl/</a> + and the XEmacs FTP Site (HTTP access only!) at <a + href="http://xemacsftp.digimirror.nl/">http://xemacsftp.digimirror.nl/</a>. + Thanks a lot! + + </dd> +  <dt>2007-08-15</dt> <dd> Index: Download/win32/innosetup-win32.txt =================================================================== RCS file: /pack/xemacscvs/XEmacs/xemacsweb/Download/win32/innosetup-win32.txt,v retrieving revision 1.12 diff -u -w -r1.12 innosetup-win32.txt --- Download/win32/innosetup-win32.txt 20 Aug 2007 19:21:54 -0000 1.12 +++ Download/win32/innosetup-win32.txt 25 Sep 2007 20:52:35 -0000 ＠＠ -1,5 +1,5 ＠＠ -  ＠＠ -20,6 +20,7 ＠＠ <li><a href="http://ftp.ca.xemacs.org/pub/Mirror/xemacs/binaries/win32/InnoSetup... (ca.xemacs.org)</a></li> <li><a href="ftp://ftp.nrc.ca/pub/packages/editors/xemacs/binaries/win32/InnoSetup/XEmacs_Setup_21.4.20.exe">Canada (nrc.ca)</a></li> <li><a href="http://ftp.cl.xemacs.org/binaries/win32/InnoSetup/XEmacs_Setup_21.4... (cl.xemacs.org)</a></li> + <li><a href="ftp://ftp.cn.postgresql.org/pub/xemacs/binaries/win32/InnoSetup/XEm... (ftp.cn.postgresql.org)</a></li> <li><a href="http://ftp.cz.xemacs.org/MIRRORS/ftp.xemacs.org/pub/xemacs/binaries... Republic (cz.xemacs.org)</a></li> <li><a href="http://ftp.dk.xemacs.org/xemacs/binaries/win32/InnoSetup/XEmacs_Set... (dk.xemacs.org)</a></li> <li><a href="http://ftp.fi.xemacs.org/pub/mirrors/ftp.xemacs.org/pub/tux/xemacs/... (fi.xemacs.org)</a></li> ＠＠ -36,6 +37,7 ＠＠ <li><a href="http://ftp.jp.xemacs.org/pub/text/xemacs/binaries/win32/InnoSetup/X... (jp.xemacs.org)</a></li> <li><a href="http://ftp.kr.xemacs.org/pub/tools/emacs/xemacs/binaries/win32/Inno... (kr.xemacs.org)</a></li> <li><a href="http://ftp.nl.xemacs.org/pub/xemacs/binaries/win32/InnoSetup/XEmacs... (nl.xemacs.org)</a></li> + <li><a href="http://xemacsftp.digimirror.nl/binaries/win32/InnoSetup/XEmacs_Setup_21.4.20.exe">Netherlands (xemacsftp.digimirror.nl)</a></li> <li><a href="http://ftp.no.xemacs.org/pub/xemacs/binaries/win32/InnoSetup/XEmacs... (no.xemacs.org)</a></li> <li><a href="http://ftp.pt.xemacs.org/binaries/win32/InnoSetup/XEmacs_Setup_21.4... (pt.xemacs.org)</a></li> <li><a href="http://ftp.ru.xemacs.org/binaries/win32/InnoSetup/XEmacs_Setup_21.4... (ru.xemacs.org)</a></li> Index: Download/win32/installshield-win32.txt =================================================================== RCS file: /pack/xemacscvs/XEmacs/xemacsweb/Download/win32/installshield-win32.txt,v retrieving revision 1.10 diff -u -w -r1.10 installshield-win32.txt --- Download/win32/installshield-win32.txt 20 Aug 2007 19:21:54 -0000 1.10 +++ Download/win32/installshield-win32.txt 25 Sep 2007 20:52:35 -0000 ＠＠ -1,5 +1,5 ＠＠ -  <a id="InstallShield-Download" ＠＠ -24,6 +24,7 ＠＠ <li><a href="http://ftp.ca.xemacs.org/pub/Mirror/xemacs/binaries/win32/installsh... (ca.xemacs.org)</a></li> <li><a href="ftp://ftp.nrc.ca/pub/packages/editors/xemacs/binaries/win32/installshield/xemacs-21.5.17.exe">Canada (nrc.ca)</a></li> <li><a href="http://ftp.cl.xemacs.org/binaries/win32/installshield/xemacs-21.5.1... (cl.xemacs.org)</a></li> + <li><a href="ftp://ftp.cn.postgresql.org/pub/xemacs/binaries/win32/installshield... (ftp.cn.postgresql.org)</a></li> <li><a href="http://ftp.cz.xemacs.org/MIRRORS/ftp.xemacs.org/pub/xemacs/binaries... Republic (cz.xemacs.org)</a></li> <li><a href="http://ftp.dk.xemacs.org/xemacs/binaries/win32/installshield/xemacs... (dk.xemacs.org)</a></li> <li><a href="http://ftp.fi.xemacs.org/pub/mirrors/ftp.xemacs.org/pub/tux/xemacs/... (fi.xemacs.org)</a></li> ＠＠ -40,6 +41,7 ＠＠ <li><a href="http://ftp.jp.xemacs.org/pub/text/xemacs/binaries/win32/installshie... (jp.xemacs.org)</a></li> <li><a href="http://ftp.kr.xemacs.org/pub/tools/emacs/xemacs/binaries/win32/inst... (kr.xemacs.org)</a></li> <li><a href="http://ftp.nl.xemacs.org/pub/xemacs/binaries/win32/installshield/xe... (nl.xemacs.org)</a></li> + <li><a href="http://xemacsftp.digimirror.nl/binaries/win32/installshield/xemacs-21.5.17.exe">Netherlands (xemacsftp.digimirror.nl)</a></li> <li><a href="http://ftp.no.xemacs.org/pub/xemacs/binaries/win32/installshield/xe... (no.xemacs.org)</a></li> <li><a href="http://ftp.pt.xemacs.org/binaries/win32/installshield/xemacs-21.5.1... (pt.xemacs.org)</a></li> <li><a href="http://ftp.ru.xemacs.org/binaries/win32/installshield/xemacs-21.5.1... (ru.xemacs.org)</a></li> Index: Download/win32/netinstall-win32.txt =================================================================== RCS file: /pack/xemacscvs/XEmacs/xemacsweb/Download/win32/netinstall-win32.txt,v retrieving revision 1.10 diff -u -w -r1.10 netinstall-win32.txt --- Download/win32/netinstall-win32.txt 20 Aug 2007 19:21:54 -0000 1.10 +++ Download/win32/netinstall-win32.txt 25 Sep 2007 20:52:35 -0000 ＠＠ -1,5 +1,5 ＠＠ -  ＠＠ -23,6 +23,7 ＠＠ <li><a href="http://ftp.ca.xemacs.org/pub/Mirror/xemacs/binaries/win32/netinstal... (ca.xemacs.org)</a></li> <li><a href="ftp://ftp.nrc.ca/pub/packages/editors/xemacs/binaries/win32/netinstall/xemacs-i586-pc-win32-21.4.13.tar.gz">Canada (nrc.ca)</a></li> <li><a href="http://ftp.cl.xemacs.org/binaries/win32/netinstall/xemacs-i586-pc-w... (cl.xemacs.org)</a></li> + <li><a href="ftp://ftp.cn.postgresql.org/pub/xemacs/binaries/win32/netinstall/xe... (ftp.cn.postgresql.org)</a></li> <li><a href="http://ftp.cz.xemacs.org/MIRRORS/ftp.xemacs.org/pub/xemacs/binaries... Republic (cz.xemacs.org)</a></li> <li><a href="http://ftp.dk.xemacs.org/xemacs/binaries/win32/netinstall/xemacs-i5... (dk.xemacs.org)</a></li> <li><a href="http://ftp.fi.xemacs.org/pub/mirrors/ftp.xemacs.org/pub/tux/xemacs/... (fi.xemacs.org)</a></li> ＠＠ -39,6 +40,7 ＠＠ <li><a href="http://ftp.jp.xemacs.org/pub/text/xemacs/binaries/win32/netinstall/... (jp.xemacs.org)</a></li> <li><a href="http://ftp.kr.xemacs.org/pub/tools/emacs/xemacs/binaries/win32/neti... (kr.xemacs.org)</a></li> <li><a href="http://ftp.nl.xemacs.org/pub/xemacs/binaries/win32/netinstall/xemac... (nl.xemacs.org)</a></li> + <li><a href="http://xemacsftp.digimirror.nl/binaries/win32/netinstall/xemacs-i586-pc-win32-21.4.13.tar.gz">Netherlands (xemacsftp.digimirror.nl)</a></li> <li><a href="http://ftp.no.xemacs.org/pub/xemacs/binaries/win32/netinstall/xemac... (no.xemacs.org)</a></li> <li><a href="http://ftp.pt.xemacs.org/binaries/win32/netinstall/xemacs-i586-pc-w... (pt.xemacs.org)</a></li> <li><a href="http://ftp.ru.xemacs.org/binaries/win32/netinstall/xemacs-i586-pc-w... (ru.xemacs.org)</a></li> Index: Releases/core-beta.txt =================================================================== RCS file: /pack/xemacscvs/XEmacs/xemacsweb/Releases/core-beta.txt,v retrieving revision 1.13 diff -u -w -r1.13 core-beta.txt --- Releases/core-beta.txt 20 Aug 2007 19:21:27 -0000 1.13 +++ Releases/core-beta.txt 25 Sep 2007 20:52:35 -0000 ＠＠ -1,5 +1,5 ＠＠ -  ＠＠ -20,6 +20,7 ＠＠ <li><a href="http://ftp.ca.xemacs.org/pub/Mirror/xemacs/beta">Canada (ca.xemacs.org)</a></li> <li><a href="ftp://ftp.nrc.ca/pub/packages/editors/xemacs/beta">Canada (nrc.ca)</a></li> <li><a href="http://ftp.cl.xemacs.org/beta">Chile (cl.xemacs.org)</a></li> + <li><a href="ftp://ftp.cn.postgresql.org/pub/xemacs/beta">China (ftp.cn.postgresql.org)</a></li> <li><a href="http://ftp.cz.xemacs.org/MIRRORS/ftp.xemacs.org/pub/xemacs/xemacs-2... Republic (cz.xemacs.org)</a></li> <li><a href="http://ftp.dk.xemacs.org/xemacs/beta">Denmark (dk.xemacs.org)</a></li> <li><a href="http://ftp.fi.xemacs.org/pub/mirrors/ftp.xemacs.org/pub/tux/xemacs/... (fi.xemacs.org)</a></li> ＠＠ -36,6 +37,7 ＠＠ <li><a href="http://ftp.jp.xemacs.org/pub/text/xemacs/beta">Japan (jp.xemacs.org)</a></li> <li><a href="http://ftp.kr.xemacs.org/pub/tools/emacs/xemacs/beta">Korea (kr.xemacs.org)</a></li> <li><a href="http://ftp.nl.xemacs.org/pub/xemacs/beta">Netherlands (nl.xemacs.org)</a></li> + <li><a href="http://xemacsftp.digimirror.nl/beta">Netherlands (xemacsftp.digimirror.nl)</a></li> <li><a href="http://ftp.no.xemacs.org/pub/xemacs/beta">Norway (no.xemacs.org)</a></li> <li><a href="http://ftp.pt.xemacs.org/beta">Portugal (pt.xemacs.org)</a></li> <li><a href="http://ftp.ru.xemacs.org/beta">Russia (ru.xemacs.org)</a></li> Index: Releases/core-stable.txt =================================================================== RCS file: /pack/xemacscvs/XEmacs/xemacsweb/Releases/core-stable.txt,v retrieving revision 1.13 diff -u -w -r1.13 core-stable.txt --- Releases/core-stable.txt 20 Aug 2007 19:21:27 -0000 1.13 +++ Releases/core-stable.txt 25 Sep 2007 20:52:35 -0000 ＠＠ -1,5 +1,5 ＠＠ -  ＠＠ -20,6 +20,7 ＠＠ <li><a href="http://ftp.ca.xemacs.org/pub/Mirror/xemacs/stable">Canada (ca.xemacs.org)</a></li> <li><a href="ftp://ftp.nrc.ca/pub/packages/editors/xemacs/stable">Canada (nrc.ca)</a></li> <li><a href="http://ftp.cl.xemacs.org/packages">Chile (cl.xemacs.org)</a></li> + <li><a href="ftp://ftp.cn.postgresql.org/pub/xemacs/stable">China (ftp.cn.postgresql.org)</a></li> <li><a href="http://ftp.cz.xemacs.org/MIRRORS/ftp.xemacs.org/pub/xemacs/stable">... Republic (cz.xemacs.org)</a></li> <li><a href="http://ftp.dk.xemacs.org/xemacs/stable">Denmark (dk.xemacs.org)</a></li> <li><a href="http://ftp.fi.xemacs.org/pub/mirrors/ftp.xemacs.org/pub/tux/xemacs/... (fi.xemacs.org)</a></li> ＠＠ -36,6 +37,7 ＠＠ <li><a href="http://ftp.jp.xemacs.org/pub/text/xemacs/stable">Japan (jp.xemacs.org)</a></li> <li><a href="http://ftp.kr.xemacs.org/pub/tools/emacs/xemacs/stable">Korea (kr.xemacs.org)</a></li> <li><a href="http://ftp.nl.xemacs.org/pub/xemacs/stable">Netherlands (nl.xemacs.org)</a></li> + <li><a href="http://xemacsftp.digimirror.nl/packages">Netherlands (xemacsftp.digimirror.nl)</a></li> <li><a href="http://ftp.no.xemacs.org/pub/xemacs/stable">Norway (no.xemacs.org)</a></li> <li><a href="http://ftp.pt.xemacs.org/stable">Portugal (pt.xemacs.org)</a></li> <li><a href="http://ftp.ru.xemacs.org/stable">Russia (ru.xemacs.org)</a></li> Index: Releases/packages-official.txt =================================================================== RCS file: /pack/xemacscvs/XEmacs/xemacsweb/Releases/packages-official.txt,v retrieving revision 1.13 diff -u -w -r1.13 packages-official.txt --- Releases/packages-official.txt 20 Aug 2007 19:21:27 -0000 1.13 +++ Releases/packages-official.txt 25 Sep 2007 20:52:35 -0000 ＠＠ -1,5 +1,5 ＠＠ -  ＠＠ -23,6 +23,7 ＠＠ <li><a href="http://ftp.ca.xemacs.org/pub/Mirror/xemacs/packages">Canada (ca.xemacs.org)</a></li> <li><a href="ftp://ftp.nrc.ca/pub/packages/editors/xemacs/packages">Canada (nrc.ca)</a></li> <li><a href="http://ftp.cl.xemacs.org/packages">Chile (cl.xemacs.org)</a></li> + <li><a href="ftp://ftp.cn.postgresql.org/pub/xemacs/packages">China (ftp.cn.postgresql.org)</a></li> <li><a href="http://ftp.cz.xemacs.org/MIRRORS/ftp.xemacs.org/pub/xemacs/packages... Republic (cz.xemacs.org)</a></li> <li><a href="http://ftp.dk.xemacs.org/xemacs/packages">Denmark (dk.xemacs.org)</a></li> <li><a href="http://ftp.fi.xemacs.org/pub/mirrors/ftp.xemacs.org/pub/tux/xemacs/... (fi.xemacs.org)</a></li> ＠＠ -39,6 +40,7 ＠＠ <li><a href="http://ftp.jp.xemacs.org/pub/text/xemacs/packages">Japan (jp.xemacs.org)</a></li> <li><a href="http://ftp.kr.xemacs.org/pub/tools/emacs/xemacs/packages">Korea (kr.xemacs.org)</a></li> <li><a href="http://ftp.nl.xemacs.org/pub/xemacs/packages">Netherlands (nl.xemacs.org)</a></li> + <li><a href="http://xemacsftp.digimirror.nl/packages">Netherlands (xemacsftp.digimirror.nl)</a></li> <li><a href="http://ftp.no.xemacs.org/pub/xemacs/packages">Norway (no.xemacs.org)</a></li> <li><a href="http://ftp.pt.xemacs.org/packages">Portugal (pt.xemacs.org)</a></li> <li><a href="http://ftp.ru.xemacs.org/packages">Russia (ru.xemacs.org)</a></li> Index: Releases/packages-pre-release.txt =================================================================== RCS file: /pack/xemacscvs/XEmacs/xemacsweb/Releases/packages-pre-release.txt,v retrieving revision 1.13 diff -u -w -r1.13 packages-pre-release.txt --- Releases/packages-pre-release.txt 20 Aug 2007 19:21:27 -0000 1.13 +++ Releases/packages-pre-release.txt 25 Sep 2007 20:52:35 -0000 ＠＠ -1,5 +1,5 ＠＠ -  ＠＠ -18,11 +18,12 ＠＠ <li><a href="http://mirror.aarnet.edu.au/pub/xemacs/beta/experimental/packages">Australia Pre-Releases (aarnet.edu.au)</a></li> <li><a href="http://ftp.au.xemacs.org/pub/xemacs/beta/experimental/packages">Aus... Pre-Releases (au.xemacs.org)</a></li> <li><a href="http://ftp.at.xemacs.org/editors/xemacs/beta/experimental/packages"... Pre-Releases (at.xemacs.org)</a></li> - <li><a href="http://ftp.be.xemacs.org/ftp/xemacs/beta/experimental/packages">Bel... (be.xemacs.org)</a></li> + <li><a href="http://ftp.be.xemacs.org/ftp/xemacs/beta/experimental/packages">Bel... Pre-Releases (be.xemacs.org)</a></li> <li><a href="http://ftp.br.xemacs.org/pub/xemacs/xemacs-21.5/experimental/packag... Pre-Releases (br.xemacs.org)</a></li> <li><a href="http://ftp.ca.xemacs.org/pub/Mirror/xemacs/beta/experimental/packag... Pre-Releases (ca.xemacs.org)</a></li> <li><a href="ftp://ftp.nrc.ca/pub/packages/editors/xemacs/beta/experimental/packages">Canada Pre-Releases (nrc.ca)</a></li> <li><a href="http://ftp.cl.xemacs.org/beta/experimental/packages">Chile Pre-Releases (cl.xemacs.org)</a></li> + <li><a href="ftp://ftp.cn.postgresql.org/pub/xemacs/beta/experimental/packages">... Pre-Releases (ftp.cn.postgresql.org)</a></li> <li><a href="http://ftp.cz.xemacs.org/MIRRORS/ftp.xemacs.org/pub/xemacs/xemacs-2... Republic Pre-Releases (cz.xemacs.org)</a></li> <li><a href="http://ftp.dk.xemacs.org/xemacs/beta/experimental/packages">Denmark Pre-Releases (dk.xemacs.org)</a></li> <li><a href="http://ftp.fi.xemacs.org/pub/mirrors/ftp.xemacs.org/pub/tux/xemacs/... Pre-Releases (fi.xemacs.org)</a></li> ＠＠ -37,12 +38,13 ＠＠ <li><a href="http://ftp.it.xemacs.org/beta/experimental/packages">Italy Pre-Releases (it.xemacs.org)</a></li> <li><a href="http://ftp.dti.ad.jp/pub/unix/editor/xemacs/beta/experimental/packages">Japan Pre-Releases (dti.ad.jp)</a></li> <li><a href="http://ftp.jp.xemacs.org/pub/text/xemacs/beta/experimental/packages... Pre-Releases (jp.xemacs.org)</a></li> - <li><a href="http://ftp.kr.xemacs.org/pub/tools/emacs/xemacs/beta/experimental/p... (kr.xemacs.org)</a></li> - <li><a href="http://ftp.nl.xemacs.org/pub/xemacs/beta/experimental/packages">Net... (nl.xemacs.org)</a></li> + <li><a href="http://ftp.kr.xemacs.org/pub/tools/emacs/xemacs/beta/experimental/p... Pre-Releases (kr.xemacs.org)</a></li> + <li><a href="http://ftp.nl.xemacs.org/pub/xemacs/beta/experimental/packages">Net... Pre-Releases (nl.xemacs.org)</a></li> + <li><a href="http://xemacsftp.digimirror.nl/beta/experimental/packages">Netherlands Pre-Releases (xemacsftp.digimirror.nl)</a></li> <li><a href="http://ftp.no.xemacs.org/pub/xemacs/beta/experimental/packages">Norway Pre-Releases (no.xemacs.org)</a></li> <li><a href="http://ftp.pt.xemacs.org/beta/experimental/packages">Portugal Pre-Releases (pt.xemacs.org)</a></li> <li><a href="http://ftp.ru.xemacs.org/beta/experimental/packages">Russia Pre-Releases (ru.xemacs.org)</a></li> - <li><a href="http://ftp.sa.xemacs.org/beta/experimental/packages">Saudi Arabia (sa.xemacs.org)</a></li> + <li><a href="http://ftp.sa.xemacs.org/beta/experimental/packages">Saudi Arabia Pre-Releases (sa.xemacs.org)</a></li> <li><a href="http://ftp.se.xemacs.org/pub/gnu/xemacs/beta/experimental/packages"... Pre-Releases (se.xemacs.org)</a></li> <li><a href="http://ftp.ch.xemacs.org/ftp/mirror/xemacs/beta/experimental/packag... Pre-Releases (ch.xemacs.org)</a></li> <li><a href="http://ftp.tw.xemacs.org/Unix/Editors/XEmacs/beta/experimental/pack... Pre-Releases (ftp.tw.xemacs.org)</a></li> -- Adrian Aichner mailto:adrian＠xemacs.org http://www.xemacs.org/ _______________________________________________ XEmacs-Patches mailing list XEmacs-Patches(a)xemacs.org http://calypso.tux.org/cgi-bin/mailman/listinfo/xemacs-patches

1 participants
0 comments

[PATCH] Check 'x-resource is a specifier tag before passing it to map-specifier 17 years

Aidan Kehoe

Ar an ceathrú lá is fiche de mí Méan Fómhair, scríobh Stephen J. Turnbull: > It's me FKtPp ;) writes: > > Dear all, > > > > The latest > > > > ftp://ftp.xemacs.org/windows/testting/XEmacs_Setup_21.5-b28-2007-09-06.exe > > > > in windows xp home edition will through out an 'unknown tag-set > > x-resource' error when changing font size from menu. > > Yo, Aidan! This one's yours.... Thanks for the pointer! It's me FKtpP ;), could you test with this patch? (I dislike the design of erroring when a specifier tag hasn't been seen; this breaks run-time checks for, say, msprinter, for example. But that's the way the design is right now.) lisp/ChangeLog addition: 2007-09-24 Aidan Kehoe <kehoea(a)parhasard.net> * font-menu.el (font-menu-set-font): Check 'x-resource is a specifier tag before passing it to map-specifier; prevents an error on pure MSW builds. XEmacs Trunk source patch: Diff command: cvs -q diff -u Files affected: lisp/font-menu.el =================================================================== RCS Index: lisp/font-menu.el =================================================================== RCS file: /pack/xemacscvs/XEmacs/xemacs/lisp/font-menu.el,v retrieving revision 1.10 diff -u -r1.10 font-menu.el --- lisp/font-menu.el 2007/04/22 19:58:33 1.10 +++ lisp/font-menu.el 2007/09/24 08:33:28 ＠＠ -367,25 +367,26 ＠＠ (selected-device)))) "pt"))) new-spec-list) - ;; If the font was initialised from X resources (the tag-set - ;; contains 'x-resource) pretend to Custom that it has - ;; responsibility for those settings. - (map-specifier (face-font 'default) - (lambda (spec locale inst-list arg) - (loop - for (tag-set . inst) - in inst-list - do (setq tag-set (delq 'x-resource tag-set) - tag-set (delq 'custom tag-set) - tag-set (cons 'custom tag-set)) - (push (cons tag-set inst) new-spec-list) - ;; Need to return nil, else map-specifier stops - finally return nil)) - nil nil '(x-resource)) - (remove-specifier (face-font 'default) nil '(x-resource)) - (when new-spec-list - (add-spec-list-to-specifier (face-font 'default) - (list (cons 'global new-spec-list)))) + (when (valid-specifier-tag-p 'x-resource) + ;; If the font was initialised from X resources (the tag-set + ;; contains 'x-resource) pretend to Custom that it has + ;; responsibility for those settings. + (map-specifier (face-font 'default) + (lambda (spec locale inst-list arg) + (loop + for (tag-set . inst) + in inst-list + do (setq tag-set (delq 'x-resource tag-set) + tag-set (delq 'custom tag-set) + tag-set (cons 'custom tag-set)) + (push (cons tag-set inst) new-spec-list) + ;; Need to return nil, else map-specifier stops + finally return nil)) + nil nil '(x-resource)) + (remove-specifier (face-font 'default) nil '(x-resource)) + (when new-spec-list + (add-spec-list-to-specifier (face-font 'default) + (list (cons 'global new-spec-list))))) (custom-set-face-update-spec 'default (list (list 'type (device-type))) (list :family (or family from-family) -- On the quay of the little Black Sea port, where the rescued pair came once more into contact with civilization, Dobrinton was bitten by a dog which was assumed to be mad, though it may only have been indiscriminating. (Saki) _______________________________________________ XEmacs-Patches mailing list XEmacs-Patches(a)xemacs.org http://calypso.tux.org/cgi-bin/mailman/listinfo/xemacs-patches

1 participants
0 comments

2024

2023

2022

2021

2020

2019

2018

2017

2016

2015

2014

2013

2012

2011

2010

2009

2008

2007

2006

2005

2004

2003

XEmacs-Patches September 2007