January 2001 - XEmacs-Beta - XEmacs Mailing List Archives

Re: Utility to submit patches against CVS 23 years, 10 months

Adrian Aichner

>>>>> "drv" == Didier Verna <didier(a)xemacs.org> writes: drv> Red Alert ! Major fuckage in XEmacs session drv> ... Probable overheat in drv> the byte compiler drv> ... All systems alted. Mister La Forge, report to the drv> drv> bridge. drv> Let's try again: Much better, patcher.el beamed up in one piece now and is soon to get out of quarantine. I haven't looked at it yet. Best regards, Adrian -- Adrian Aichner mailto:adrian＠xemacs.org http://www.xemacs.org/

1 participants
0 comments

Re: LessTif [Was Re: Anyone using b39 non-Solaris + SIGIO + widgets + Motif?] 23 years, 10 months

Raymond Toy

>>>>> "Andy" == Andy Piper <andy(a)xemacs.org> writes: Andy> Urg, I should fix this for the release. I think its Andy> something Ben broke but we can conditionally re-enable it. Do you need more information from me? Are you sure you want to do this? With real Sun Motif, I don't have this problem. I only see it with Lesstif (with Motif 2.0 compatibility). Ray

1 participants
0 comments

LessTif [Was Re: Anyone using b39 non-Solaris + SIGIO + widgets + Motif?] 23 years, 10 months

Raymond Toy

>>>>> "Raymond" == Raymond Toy <toy(a)rtp.ericsson.se> writes: Raymond> -You can try configuring with --with-widgets=athena to use the Athena Raymond> -widgets. Alternatively, you may use LessTif as a replacement for Raymond> -Sun's Motif. This works too. Yuck. This solves the slow progress bar problem, but it introduces another much more painful bug. Whenever I try to cut some text, xemacs goes into some loop wherein it uses 50% CPU talking to the X server that takes the remaining 50% CPU. There some emacs code that says hack_motif which call some motif (Lesstif) function. If someone is interested I can provide complete info. However, I'm giving up on motif for widgets. Athena widgets with Motif dialog boxes seems to work just fine together. Ray

2 participants
1 comments

OK.. Do I want to ask? 23 years, 10 months

Valdis Kl=?iso8859-4?Q?=BA?=tnieks

Modified Files: Tag: release-21-2 aix4.h Log Message: Port "portable" dumper to SunOS 4 and HP-UX. (No, I've not actually checked the file... I just had massive cognitive dissonance when I saw it ;) /Valdis

2 participants
1 comments

Utility to submit patches against CVS 23 years, 10 months

Stephen J. Turnbull

Hacked this up while not proctoring the national university entrance exam (still had to sit around with no net access in case one of the proctors got sick). Lightly tested. An early version generated the patch "New FAQ. XEmacs bitches about xmodmap." ;;; sjt/prepare-xemacs-patch ;; ;; Copyright 2001 Stephen J. Turnbull <stephen(a)xemacs.org> ;; ;; This program is free software, and may be redistributed under the ;; terms of the GNU Library General Public License, version 2, or its ;; successor (known as the GNU Lesser General Public License, any version). ;; ;; Function: ;; ;; * Sets up a mail buffer with ChangeLogs and cvs diffs, addressed to ;; xemacs-patches, and an appropriate partial subject. ;; ;; Features: ;; ;; * Automatically scrounges around for ChangeLogs. Will bitch if it ;; doesn't find one with a new entry. (Not reliable: it doesn't have ;; to be the appropriate entry, just a non-null diff.) ;; * ChangeLogs come first, and are not repeated if explicitly requested. ;; * ChangeLogs are diff'ed -U 0, other files are diff'ed -u. ;; * Munges cvs diffs that don't include paths in the "---" and "+++" ;; lines. (Idea due to Martin's cvs-diff script.) ;; * Bitches if a diff isn't done. ;; * Isn't a Perl script. ;; ;; Misfeatures: ;; ;; * Currently only knows about VM, but should be easily adaptable to ;; message. (Patches welcome!) ;; * Isn't a Perl script. ;; ;; To do: ;; ;; * Offer to retry missing diffs. ;; * Better argument processing. ;; * Check ChangeLog entries against diff'ed files. ;; * Customize. ;; * Port to Perl. (require 'vm) (defvar sjt/prepare-xemacs-patch-root "/coda/Projects/XEmacs" "Root of XEmacs workspace. XEmacs modules should be checked out into subdirectories of this directory.") (defvar sjt/prepare-xemacs-patch-module-tag-alist '(("21.2-HEAD" . "21.2") ("21.1-HEAD" . "21.1") ("xemacsweb" . "xemacsweb") ("xemacs-packages" . "packages")) "Map modules (directories) to tags for Subject header. Each element is a cons of two strings. The cdr can also be nil; if so, the Subject header will be left empty.") (defvar sjt/diff-index-re "^Index:\\s-+\$\\(\\(?:\\S-+/\$*\\)\$\\S-+\$\\)\\s-*$" "Regexp matching the Index hint given by cvs diff. Group 1 matches the whole (relative) path and should be equal to the requested path. Group 2 matches the directory prefix, and will be inserted to correct cvs diffs that only give the file name in the change headers. Group 3 matches the file name.") (defun sjt/prepare-xemacs-patch (module files) "Prepare a patch against CVS to a MODULE of XEmacs, applying to FILES. Uses -U 0 to diff ChangeLogs, and -u to diff files. Inserts the result in the message buffer and munges the \"---\" and \"+++\" headers to match the \"Index\". Leaves point in Subject header after inserting a tag such as \"[21.2]\" (see `sjt/prepare-xemacs-patch-module-tag-alist'). MODULE is the name of the directory containing the XEmacs module. FILES is a string containing a space separated list of file specs to be `cvs diff'ed. Each spec must be a full path relative to `sjt/prepare-xemacs-patch-root' concatenated with MODULE (\"top level\"). ChangeLogs will be searched for in the same directory, the parent, and so on up to top level. They may be omitted from FILES. Example: (sjt/prepare-xemacs-patch "21.2-HEAD" "man/xemacs-faq.texi") does cd /coda/Projects/XEmacs/21.2-HEAD diff -U 0 man/ChangeLog diff -u man/xemacs-faq.texi and sets up the header To: XEmacs Patches <xemacs-patches(a)xemacs.org> Subject: [21.2] BUG: The only message agent available is vm-mail." ;; #### Do argument parsing with existence check on $top/$module, and ;; using an iterator to get filenames with check and completion. (interactive "sModule name: \nsSpace-separated list of files: ") ;; Parse the arguments. (let ((top (expand-file-name module sjt/prepare-xemacs-patch-root)) (relpaths (split-string files)) (logs nil) (notfound nil)) ;; Air-check module (if (not (file-exists-p top)) (error "XEmacs module %s doesn't seem to exist!" top) (setq top (file-name-as-directory top))) ;; Search for and handle ChangeLogs (let ((paths relpaths)) (while paths (message "Paths: %s" paths) (let ((log (car paths))) (if (and (string-match "ChangeLog" log) (not (member log logs)) (or (file-exists-p (expand-file-name log top)) ;; always non-nil (setq notfound (cons log notfound)))) (setq logs (cons log logs)) (let ((dir log)) (setq log (catch 'found ;; try ChangeLog in parent of dir (while dir (message "Looking for log as sibling of %s" dir) (setq dir (file-name-directory (directory-file-name dir))) (let ((file (concat dir "ChangeLog"))) (message "Looking for log as %s" file) (cond ((member file logs) (throw 'found nil)) ((file-exists-p (expand-file-name file top)) (throw 'found file))))) ;; made it to top level without finding a ChangeLog (setq notfound (cons "ChangeLog" notfound)))) (if log (setq logs (cons log logs))))) (setq paths (cdr paths))))) ;; Remove ChangeLogs from explicit file list. (mapcar #'(lambda (log) (setq relpaths (delete log relpaths))) logs) ;; Aircheck file list (ChangeLogs have all already been checked) (mapcar #'(lambda (file) (message "Checking %s" (expand-file-name file top)) (if (not (file-exists-p (expand-file-name file top))) (setq notfound (cons file notfound)))) relpaths) (if (and notfound (y-or-n-p (format "diffs requested for %s but files(s) not found. Abort? " notfound))) (message "Aborted!") ;; Set up message buffer. (vm-mail "XEmacs Patches <xemacs-patches(a)xemacs.org>") (insert "\n\n\n") (backward-char) (shell-command (apply #'concat `("cd " ,(directory-file-name top) " ; cvs diff -U 0" ,＠(mapcar #'(lambda (el) (concat " " el)) logs) " 2>/dev/null ; cvs diff -u" ,＠(mapcar #'(lambda (el) (concat " " el)) relpaths) " 2>/dev/null")) t) ;; Check for successful cvs diff and munge change lines like mrb's ;; cvs-diff (let ((diffs (append logs relpaths))) (mail-text) (while diffs (re-search-forward sjt/diff-index-re nil t) (let ((full (match-string 1)) (prefix (match-string 2)) (file (match-string 3))) (forward-line 5) (if (looking-at "^---\\s-+") (progn (goto-char (match-end 0)) (cond ((looking-at full)) ((looking-at file) (insert prefix)) (t (save-excursion (mail-text) (insert (format "***** bad format in diff of %s *****\n" full))))))) (forward-line 1) (if (looking-at "^\\+\\+\\+\\s-+") (progn (goto-char (match-end 0)) (cond ((looking-at full)) ((looking-at file) (insert prefix)) (t (save-excursion (mail-text) (insert (format "***** bad format in diff of %s *****\n" full))))))) (setq diffs (delete full diffs)))) ;; could try redoing the diff here (when diffs (mail-text) (insert (format "**** cvs diff of %s failed! *****" diffs)))) ;; Set up subject header (mail-subject) (let ((tag (cdr (assoc module sjt/prepare-xemacs-patch-module-tag-alist)))) (if tag (insert "[" tag "] ")))))) -- University of Tsukuba Tennodai 1-1-1 Tsukuba 305-8573 JAPAN Institute of Policy and Planning Sciences Tel/fax: +81 (298) 53-5091 _________________ _________________ _________________ _________________ What are those straight lines for? "XEmacs rules."

2 participants
2 comments

Re: Anyone using b39 non-Solaris + SIGIO + widgets + Motif? 23 years, 10 months

Raymond Toy

>>>>> "Martin" == Martin Buchholz <martin(a)xemacs.org> writes: Martin> Why do I get the feeling this is an XEmacs bug, and as such shouldn't Martin> really be in PROBLEMS (which are about _other_ peoples' bugs). I'm not qualified to answer this. :-( Ray> -There have been reports of Sun sed truncating very long lines in the Ray> +There have been reports of Sun sed truncating very lines in the Martin> Huh? How did this sneak in? It's a typo in the original PROBLEMS file for sed on Solaris 2.5. (And I used to have this problem on 2.5.) Ray

6 participants
5 comments

Re: Netinstall 23 years, 10 months

Adrian Aichner

>>>>> "Andy" == Andy Piper <andy(a)xemacs.org> writes: Andy> At 00:59 21/01/01 +0100, Adrian Aichner wrote: >> setup.exe crashes on w2k at end of installation. Andy> I fixed this - are you sure you are not using an old version? I'll try again later when you point me to a setup.exe URL officially sanctioned by you personally. Andy> andy Andy> -------------------------------------------------------------- Andy> Dr Andy Piper Andy> Principal Consultant, BEA Systems Ltd -- Adrian Aichner mailto:adrian＠xemacs.org http://www.xemacs.org/

1 participants
0 comments

Re: Utility to submit patches against CVS 23 years, 10 months

Adrian Aichner

>>>>> "drv" == Didier Verna <didier(a)xemacs.org> writes: drv> Stephen J. Turnbull wrote: >> Hacked this up while not proctoring the national university entrance >> exam (still had to sit around with no net access in case one of the >> proctors got sick). drv> Hmmm, you force me to post this then. I guess I drv> should have done so drv> long ago. I'd posted an drv> early version on xemcs-review, but here's a more drv> drv> recent one based on some remarks from Martin and Ben. drv> I don't have time to look at your code right now, but drv> I will ASAIC. drv> filename="~/.xemacs/xemacs-packages/lisp/patcher/patcher.el" Didier, that attachment did not make it to me (emacs-version "21.1 (patch 13) \"Crater Lake\" XEmacs Lucid" gnus-version "Gnus v5.8.7". Adrian drv> -- drv> / / _ _ Didier Verna http://www.inf.enst.fr/~verna/ drv> - / / - / / /_/ / EPITA / LRDE mailto:didier＠lrde.epita.fr drv> /_/ / /_/ / /__ / 14-16 rue Voltaire Tel. +33 (1) 53 14 59 47 drv> 94276 Kremlin-Bicêtre cedex Fax. +33 (1) 44 08 01 99 -- Adrian Aichner mailto:adrian＠xemacs.org http://www.xemacs.org/

1 participants
0 comments

Re: httpd went down, now restarted [was: Release announcement: PXP] 23 years, 10 months

Adrian Aichner

>>>>> "Stephen" == Stephen J Turnbull <turnbull(a)sk.tsukuba.ac.jp> writes: >>>>> "APA" == Adrian Aichner <Adrian.Aichner(a)t-online.de> writes: >>>>> "Stephen" == Stephen J Turnbull <turnbull(a)sk.tsukuba.ac.jp> writes: APA> I am refused connection to both packages! Stephen> Not really. There was no server running. I couldn't Stephen> access it, either. (I use a local mirror on my Stephen> workstation to test web service, so I didn't notice ;-) APA> That site seems rather private. Stephen> debconf lossage, I think. Anyway, the last time I Stephen> upgraded Debian (about 36 hours ago), it took the web Stephen> server down but failed to bring it back up. Try it now. Yep, I got the pxp src package now, great. Stephen> Thanks for the head's up! Stephen> -- Stephen> University of Tsukuba Tennodai 1-1-1 Tsukuba 305-8573 JAPAN Stephen> Institute of Policy and Planning Sciences Tel/fax: +81 (298) 53-5091 Stephen> _________________ _________________ _________________ _________________ Stephen> What are those straight lines for? "XEmacs rules." -- Adrian Aichner mailto:adrian＠xemacs.org http://www.xemacs.org/

1 participants
0 comments

Problems building packages 23 years, 10 months

Norbert Koch

Hi! I'm trying to build the packages local. I encounter a couple of problems: - I've had to introduce an explicit type cast to build eicq ========================================================= Index: udp2tcp.cc =================================================================== RCS file: /usr/CVSroot/XEmacs/xemacs-packages/comm/eicq/udp2tcp.cc,v retrieving revision 1.2 diff -u -r1.2 udp2tcp.cc --- udp2tcp.cc 2000/10/23 15:48:59 1.2 +++ udp2tcp.cc 2001/01/21 13:45:19 ＠＠ -334,7 +334,7 ＠＠ printf("accepting....\n"); size_t sin_size = sizeof(struct sockaddr_in); tcp_new_sock = accept(tcp_sock, (struct sockaddr *)&tcp_remote_addr, - &sin_size); + (int *)&sin_size); sock_error_exit(tcp_new_sock == -1, "accept"); Without this, I get the error nk＠lamia:eicq$ gmake g++ -o udp2tcp udp2tcp.cc -O2 -Wall -static udp2tcp.cc: In function `int main(int, char **)': udp2tcp.cc:337: passing `size_t *' as argument 3 of `accept(int, sockaddr *, int *)' changes signedness gmake: *** [udp2tcp] Error 1 - in place, ie gmake install, symlink = t ======================================= cp: `/usr/local/users/support/nk/cvs/xemacs-packages/oa/psgml/etc/HTMLlat1.ent' and `/sw/i386_fbsd3/xemacs-21.2/lib/xemacs-cvs/xemacs-packages/etc/psgml/HTMLlat1.ent' are the same file ... gmake[1]: *** [binkit-common] Error 1 gmake[1]: Leaving directory `/usr/local/users/support/nk/cvs/xemacs-packages/oa/psgml' gmake: *** [oa/psgml/XEMACS.install] Error 2 - gmake bindist ============= xemacs -vanilla -batch \ -l package-info.el -f batch-update-package-info \ '1.48' /usr/local/users/support/nk/cvs/xemacs-packages/bindist/xemacs-base-1.48-pkg.tar.gz \ '' \ '' 'XEmacs Development Team <xemacs-beta(a)xemacs.org>' 'libs' Cannot open load file: package-info.el xemacs exiting . gmake[2]: *** [package-info] Error 255 gmake[2]: Leaving directory `/usr/local/users/support/nk/cvs/xemacs-packages/libs/xemacs-base' gmake[1]: *** [xemacs-base/bindist.target] Error 2 gmake[1]: Leaving directory `/usr/local/users/support/nk/cvs/xemacs-packages/libs' gmake: *** [libs/bindist.target] Error 2 Any pointer how to get anything of this to work (gmake install seems to work, BTW). TIA, norbert.

3 participants
5 comments

2024

2023

2022

2021

2020

2019

2018

2017

2016

2015

2014

2013

2012

2011

2010

2009

2008

2007

2006

2005

2004

2003

2002

2001

2000

1999

1998

XEmacs-Beta January 2001