COMMIT 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.82 diff -u -U0 -r1.82 ChangeLog --- ChangeLog 26 Sep 2007 20:53:16 -0000 1.82 +++ ChangeLog 7 Oct 2007 18:56:32 -0000 ＠＠ -0,0 +1,13 ＠＠ +2007-10-07 Adrian Aichner <adrian(a)xemacs.org&gt; + + * adrian/website/package-get-2-download-sites.el: Remove + InstallShield and Netinstall information, add Beta XEmacs and + Gnuclient InnoSetup kits. + * adrian/website/package-get-2-download-sites.el (package-get-2-download-sites-netinstall): Removed. + * adrian/website/package-get-2-download-sites.el (package-get-2-download-sites-installshield): Removed. + * adrian/website/package-get-2-download-sites.el (package-get-2-download-sites-innosetup): Refactor to handle Stable, Beta, and Gnuclient kits. + * adrian/website/package-get-2-download-sites.el + (package-get-2-download-sites): Generate download site files for + InnoSetup Beta and Gnuclient kits. No longer generate Netinstall + and InstallShield files. + 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.15 diff -u -w -r1.15 package-get-2-download-sites.el --- adrian/website/package-get-2-download-sites.el 26 Sep 2007 20:53:19 -0000 1.15 +++ adrian/website/package-get-2-download-sites.el 7 Oct 2007 18:53:19 -0000 ＠＠ -138,29 +138,29 ＠＠ (replace-in-string (third e) "/packages$" "/stable"))) package-get-download-sites)) -(defun package-get-2-download-sites-netinstall () - (mapcar - (lambda (e) - (list (replace-in-string (first e) " Pre-Releases" "") - (second e) - (replace-in-string - (third e) - package-get-2-download-sites-experimental-packages-regex - "binaries/win32/netinstall/xemacs-i586-pc-win32-21.4.13.tar.gz"))) - package-get-pre-release-download-sites)) - -(defun package-get-2-download-sites-installshield () - (mapcar - (lambda (e) - (list (replace-in-string (first e) " Pre-Releases" "") - (second e) - (replace-in-string - (third e) - package-get-2-download-sites-experimental-packages-regex - "binaries/win32/installshield/xemacs-21.5.17.exe"))) - package-get-pre-release-download-sites)) +; (defun package-get-2-download-sites-netinstall () +; (mapcar +; (lambda (e) +; (list (replace-in-string (first e) " Pre-Releases" "") +; (second e) +; (replace-in-string +; (third e) +; package-get-2-download-sites-experimental-packages-regex +; "binaries/win32/netinstall/xemacs-i586-pc-win32-21.4.13.tar.gz"))) +; package-get-pre-release-download-sites)) + +; (defun package-get-2-download-sites-installshield () +; (mapcar +; (lambda (e) +; (list (replace-in-string (first e) " Pre-Releases" "") +; (second e) +; (replace-in-string +; (third e) +; package-get-2-download-sites-experimental-packages-regex +; "binaries/win32/installshield/xemacs-21.5.17.exe"))) +; package-get-pre-release-download-sites)) -(defun package-get-2-download-sites-innosetup () +(defun package-get-2-download-sites-innosetup (kit) (mapcar (lambda (e) (list (replace-in-string (first e) " Pre-Releases" "") ＠＠ -168,7 +168,7 ＠＠ (replace-in-string (third e) package-get-2-download-sites-experimental-packages-regex - "binaries/win32/InnoSetup/XEmacs_Setup_21.4.20.exe"))) + (concat "binaries/win32/InnoSetup/" kit)))) package-get-pre-release-download-sites)) ; package-get-2-download-sites-gamma ＠＠ -229,45 +229,70 ＠＠ <p><a href=\"#index\">Goto</a> Index</p> ") +; (package-get-2-download-sites-file +; "Download/win32/netinstall-win32.txt" +; (package-get-2-download-sites-netinstall) +; " +; <a id=\"Netinstall-Download\" name=\"Netinstall-Download\">Download</a> +; an outdated Windows installkit from <a +; href=\"http://ftp.xemacs.org/xemacs/binaries/win32/netinstall/\"... +; or a mirror in your country, if you need to use a release not +; available in form of the recommended <a +; href=\"#InnoSetup-Download\">InnoSetup</a> install kit for some +; reason: + +; <p><a href=\"#index\">Goto</a> Index</p> +; ") +; (package-get-2-download-sites-file +; "Download/win32/installshield-win32.txt" +; (package-get-2-download-sites-installshield) +; " <a id=\"InstallShield-Download\" +; name=\"InstallShield-Download\">Download</a> an outdated Windows +; installkit from <a +; href=\"http://ftp.xemacs.org/xemacs/binaries/win32/installshield/\&q... +; or a mirror in your country, if you don't want to use the if you +; need to use a release not available in form of the recommended <a +; href=\"#InnoSetup-Download\">InnoSetup</a> install kit for some +; reason: + +; <p><a href=\"#index\">Goto</a> Index</p> + +; ") (package-get-2-download-sites-file - "Download/win32/netinstall-win32.txt" - (package-get-2-download-sites-netinstall) + "Download/win32/innosetup-stable-win32.txt" + (package-get-2-download-sites-innosetup "XEmacs_Setup_21.4.20.exe") " - <a id=\"Netinstall-Download\" name=\"Netinstall-Download\">Download</a> - an outdated Windows installkit from <a - href=\"http://ftp.xemacs.org/xemacs/binaries/win32/netinstall/\"... - or a mirror in your country, if you need to use a release not - available in form of the recommended <a - href=\"#InnoSetup-Download\">InnoSetup</a> install kit for some - reason: + <a id=\"InnoSetup-Stable-Download\" name=\"InnoSetup-Stable-Download\">Download</a> + the recommended stable native Windows installkit from <a + href=\"http://ftp.xemacs.org/xemacs/binaries/win32/InnoSetup/\"... + or a mirror in your country: <p><a href=\"#index\">Goto</a> Index</p> + ") (package-get-2-download-sites-file - "Download/win32/installshield-win32.txt" - (package-get-2-download-sites-installshield) - " <a id=\"InstallShield-Download\" - name=\"InstallShield-Download\">Download</a> an outdated Windows - installkit from <a - href=\"http://ftp.xemacs.org/xemacs/binaries/win32/installshield/\&q... - or a mirror in your country, if you don't want to use the if you - need to use a release not available in form of the recommended <a - href=\"#InnoSetup-Download\">InnoSetup</a> install kit for some - reason: + "Download/win32/innosetup-beta-win32.txt" + (package-get-2-download-sites-innosetup "XEmacs_Setup_21.5-b28.exe") + " + <a id=\"InnoSetup-Beta-Download\" name=\"InnoSetup-Beta-Download\">Download</a> + the recommended beta native Windows installkit from <a + href=\"http://ftp.xemacs.org/xemacs/binaries/win32/InnoSetup/\"... + or a mirror in your country: <p><a href=\"#index\">Goto</a> Index</p> ") (package-get-2-download-sites-file - "Download/win32/innosetup-win32.txt" - (package-get-2-download-sites-innosetup) + "Download/win32/innosetup-gnuclient-win32.txt" + (package-get-2-download-sites-innosetup "gnuclient_setup.exe") " - <a id=\"InnoSetup-Download\" name=\"InnoSetup-Download\">Download</a> - the recommended stable native Windows installkit from <a + <a id=\"InnoSetup-Gnuclient-Download\" name=\"InnoSetup-Gnuclient-Download\">Download</a> + the recommended gnuclient Windows installkit from <a href=\"http://ftp.xemacs.org/xemacs/binaries/win32/InnoSetup/\"... or a mirror in your country: <p><a href=\"#index\">Goto</a> Index</p> + ")) (defun package-get-2-download-sites-generated-by-string () -- 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