If someone else is committing something in this directory, fair enough, I’ll
try tomorrow. If I’m getting this message because Steve Youngs, who by his
own account doesn’t have workable CVS access, is listed as the maintainer,
then let me just contain my joy.
**** Access denied: Insufficient Karma (aidan|XEmacs/packages/xemacs-packages/net-utils)
cvs server: Pre-commit check failed
cvs [server aborted]: correct above errors first!
xemacs-packages/net-utils/ChangeLog addition:
2007-11-28 Aidan Kehoe <kehoea(a)parhasard.net>
* xemacsbug.el:
Document that we speak most of the major Western languages plus
Japanese, but that English is the working language of the project
and reports in it are preferred.
* xemacsbug.el (report-xemacs-bug-help):
Don't quote the lambda expression as a list.
* xemacsbug.el (xemacs-default-composefunc-dont-nag): New.
defvar it here (it's been added to the core of 21.5) to avoid
compile errors on 21.4.
* xemacsbug.el (report-xemacs-bug):
Bind xemacs-default-composefunc-dont-nag to avoid warnings about
the crapness of the default email client when reporting bugs.
* xemacsbug.el (report-xemacs-bug-hook):
Don't quote the lambda expression as a list.
XEmacs Packages source patch:
Diff command: cvs -q diff -Nu
Files affected: xemacs-packages/net-utils/xemacsbug.el
===================================================================
RCS
Index: xemacs-packages/net-utils/xemacsbug.el
===================================================================
RCS file: /pack/xemacscvs/XEmacs/packages/xemacs-packages/net-utils/xemacsbug.el,v
retrieving revision 1.13
diff -u -u -r1.13 xemacsbug.el
--- xemacs-packages/net-utils/xemacsbug.el 2007/06/21 15:22:57 1.13
+++ xemacs-packages/net-utils/xemacsbug.el 2007/11/28 21:30:27
@@ -105,8 +105,11 @@
"\nThis bug report will be sent to the XEmacs Development Team,
not to your local site managers!!
-Please write in English, because the XEmacs maintainers do not have
-translators to read other languages for them.
+The working language of XEmacs development is English. Bug reports in
+English will be dealt with most promptly and most effectively. However, the
+XEmacs maintainers as a group speak most of the major Western languages and
+Japanese, so if communicating in English is a problem for you, please feel
+free to report your bug using one of those other languages.
Please describe as succinctly as possible:
\t- What happened.
@@ -137,9 +140,10 @@
(defun report-xemacs-bug-help ()
"Display the help buffer for `report-xemacs-bug'."
(with-electric-help
- '(lambda ()
- (define-key (current-local-map) "\C-c\C-i" 'report-xemacs-bug-info)
- (princ (substitute-command-keys report-xemacs-bug-help)) nil) "*Bug
Help*"))
+ (lambda ()
+ (define-key (current-local-map) "\C-c\C-i" 'report-xemacs-bug-info)
+ (princ (substitute-command-keys report-xemacs-bug-help)) nil)
+ "*Bug Help*"))
(defun report-xemacs-bug-packages-list ()
"Insert into the current buffer a list of installed packages."
@@ -152,6 +156,8 @@
(nth 4 (car pkgs))))
(setq pkgs (cdr pkgs)))))
+(defvar xemacs-default-composefunc-dont-nag nil)
+
;;;###autoload
(defun report-xemacs-bug (topic &optional recent-keys)
"Report a bug in XEmacs.
@@ -159,7 +165,8 @@
;; This strange form ensures that (recent-keys) is the value before
;; the bug subject string is read.
(interactive (reverse (list (recent-keys) (read-string "Bug Subject: "))))
- (let (user-point)
+ (let ((xemacs-default-composefunc-dont-nag t)
+ user-point)
(setq topic (concat "[Bug: " emacs-program-version "] " topic))
(if xemacs-betaname
(compose-mail report-xemacs-bug-beta-address
@@ -394,8 +401,8 @@
(kill-local-variable 'mail-send-hook)))
(unless report-xemacs-bug-no-explanations
(with-electric-help
- '(lambda ()
- (insert "\n
+ (lambda ()
+ (insert "\n
You invoked the command M-x report-xemacs-bug,
but you decided not to mail the bug report to the XEmacs maintainers.
--
¿Dónde estará ahora mi sobrino Yoghurtu Nghé, que tuvo que huir
precipitadamente de la aldea por culpa de la escasez de rinocerontes?
_______________________________________________
XEmacs-Patches mailing list
XEmacs-Patches(a)xemacs.org
http://calypso.tux.org/cgi-bin/mailman/listinfo/xemacs-patches