[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 @@
<p>
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!
</p>
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 @@
<!-- Generated by 21.5 (beta28) "fuki" (+CVS-20070904) XEmacs Lucid
- at Tue Sep 25 22:13:39 2007 +0200 (W. Europe Daylight Time)
+ at Wed Sep 26 22:17:44 2007 +0200 (W. Europe Daylight Time)
by M-x package-get-2-download-sites
available from XEmacs CVS at xemacs-builds/adrian/website -->
@@ -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 @@
<!-- Generated by 21.5 (beta28) "fuki" (+CVS-20070904) XEmacs Lucid
- at Tue Sep 25 22:13:39 2007 +0200 (W. Europe Daylight Time)
+ at Wed Sep 26 22:17:43 2007 +0200 (W. Europe Daylight Time)
by M-x package-get-2-download-sites
available from XEmacs CVS at xemacs-builds/adrian/website -->
<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 @@
<!-- Generated by 21.5 (beta28) "fuki" (+CVS-20070904) XEmacs Lucid
- at Tue Sep 25 22:13:39 2007 +0200 (W. Europe Daylight Time)
+ at Wed Sep 26 22:17:43 2007 +0200 (W. Europe Daylight Time)
by M-x package-get-2-download-sites
available from XEmacs CVS at xemacs-builds/adrian/website -->
@@ -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 @@
<!-- Generated by 21.5 (beta28) "fuki" (+CVS-20070904) XEmacs Lucid
- at Tue Sep 25 22:13:39 2007 +0200 (W. Europe Daylight Time)
+ at Wed Sep 26 22:17:43 2007 +0200 (W. Europe Daylight Time)
by M-x package-get-2-download-sites
available from XEmacs CVS at xemacs-builds/adrian/website -->
@@ -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 @@
<!-- Generated by 21.5 (beta28) "fuki" (+CVS-20070904) XEmacs Lucid
- at Tue Sep 25 22:13:39 2007 +0200 (W. Europe Daylight Time)
+ at Wed Sep 26 22:17:43 2007 +0200 (W. Europe Daylight Time)
by M-x package-get-2-download-sites
available from XEmacs CVS at xemacs-builds/adrian/website -->
@@ -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 @@
<!-- Generated by 21.5 (beta28) "fuki" (+CVS-20070904) XEmacs Lucid
- at Tue Sep 25 22:13:39 2007 +0200 (W. Europe Daylight Time)
+ at Wed Sep 26 22:17:43 2007 +0200 (W. Europe Daylight Time)
by M-x package-get-2-download-sites
available from XEmacs CVS at xemacs-builds/adrian/website -->
@@ -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 @@
<!-- Generated by 21.5 (beta28) "fuki" (+CVS-20070904) XEmacs Lucid
- at Tue Sep 25 22:13:39 2007 +0200 (W. Europe Daylight Time)
+ at Wed Sep 26 22:17:43 2007 +0200 (W. Europe Daylight Time)
by M-x package-get-2-download-sites
available from XEmacs CVS at xemacs-builds/adrian/website -->
@@ -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
[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
[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
[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
[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
[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
[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>
<!-- one of (dd dt) -->
+ <dt><strong>2007-09-24</strong></dt>
+ <dd>
+ <p>
+ 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!
+ </p>
+ </dd>
+ <!-- one of (dd dt) -->
+ <dt><strong>2007-09-12</strong></dt>
+ <dd>
+ <p>
+ <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!
+ </p>
+ </dd>
+ <!-- one of (dd dt) -->
<dt><strong>2007-08-15</strong></dt>
<dd>
<p>
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 @@
- <!-- Generated by 21.5 (beta28) "fuki" (+CVS-20070818) XEmacs Lucid
- at Mon Aug 20 21:14:41 2007 +0200 (W. Europe Daylight Time)
+ <!-- Generated by 21.5 (beta28) "fuki" (+CVS-20070904) XEmacs Lucid
+ at Tue Sep 25 22:13:39 2007 +0200 (W. Europe Daylight Time)
by M-x package-get-2-download-sites
available from XEmacs CVS at xemacs-builds/adrian/website -->
@@ -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 @@
- <!-- Generated by 21.5 (beta28) "fuki" (+CVS-20070818) XEmacs Lucid
- at Mon Aug 20 21:14:41 2007 +0200 (W. Europe Daylight Time)
+ <!-- Generated by 21.5 (beta28) "fuki" (+CVS-20070904) XEmacs Lucid
+ at Tue Sep 25 22:13:39 2007 +0200 (W. Europe Daylight Time)
by M-x package-get-2-download-sites
available from XEmacs CVS at xemacs-builds/adrian/website -->
<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 @@
- <!-- Generated by 21.5 (beta28) "fuki" (+CVS-20070818) XEmacs Lucid
- at Mon Aug 20 21:14:41 2007 +0200 (W. Europe Daylight Time)
+ <!-- Generated by 21.5 (beta28) "fuki" (+CVS-20070904) XEmacs Lucid
+ at Tue Sep 25 22:13:39 2007 +0200 (W. Europe Daylight Time)
by M-x package-get-2-download-sites
available from XEmacs CVS at xemacs-builds/adrian/website -->
@@ -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 @@
- <!-- Generated by 21.5 (beta28) "fuki" (+CVS-20070818) XEmacs Lucid
- at Mon Aug 20 21:14:41 2007 +0200 (W. Europe Daylight Time)
+ <!-- Generated by 21.5 (beta28) "fuki" (+CVS-20070904) XEmacs Lucid
+ at Tue Sep 25 22:13:39 2007 +0200 (W. Europe Daylight Time)
by M-x package-get-2-download-sites
available from XEmacs CVS at xemacs-builds/adrian/website -->
@@ -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 @@
- <!-- Generated by 21.5 (beta28) "fuki" (+CVS-20070818) XEmacs Lucid
- at Mon Aug 20 21:14:41 2007 +0200 (W. Europe Daylight Time)
+ <!-- Generated by 21.5 (beta28) "fuki" (+CVS-20070904) XEmacs Lucid
+ at Tue Sep 25 22:13:39 2007 +0200 (W. Europe Daylight Time)
by M-x package-get-2-download-sites
available from XEmacs CVS at xemacs-builds/adrian/website -->
@@ -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 @@
- <!-- Generated by 21.5 (beta28) "fuki" (+CVS-20070818) XEmacs Lucid
- at Mon Aug 20 21:14:41 2007 +0200 (W. Europe Daylight Time)
+ <!-- Generated by 21.5 (beta28) "fuki" (+CVS-20070904) XEmacs Lucid
+ at Tue Sep 25 22:13:39 2007 +0200 (W. Europe Daylight Time)
by M-x package-get-2-download-sites
available from XEmacs CVS at xemacs-builds/adrian/website -->
@@ -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 @@
- <!-- Generated by 21.5 (beta28) "fuki" (+CVS-20070818) XEmacs Lucid
- at Mon Aug 20 21:14:41 2007 +0200 (W. Europe Daylight Time)
+ <!-- Generated by 21.5 (beta28) "fuki" (+CVS-20070904) XEmacs Lucid
+ at Tue Sep 25 22:13:39 2007 +0200 (W. Europe Daylight Time)
by M-x package-get-2-download-sites
available from XEmacs CVS at xemacs-builds/adrian/website -->
@@ -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
[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