[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Savannah-hackers] Duplicate diffs
|
From: |
Richard Stallman |
|
Subject: |
[Savannah-hackers] Duplicate diffs |
|
Date: |
Sat, 10 Nov 2001 19:23:31 -0700 (MST) |
There are duplications in these diff messages. The unexelf.c change
from version 1.40 to 1.41 appears twice, in two different digest
messages. Its change log entry appears three times in a single digest
message--twice attributed to Gerd, and once to Jason Rumney.
That misattribution is especially suspect, because it suggests the
possibility that something in the script is getting the wrong diffs
and/or the wrong name. Perhaps the duplicate entries were supposed to
contain something else; perhaps whatever they should have included was
omitted.
I think it would be a good idea to check these messages carefully against
the set of changes recorded for the time period in question, and verify that
every change committed during that time is really in the messages.
From: address@hidden
Subject: Emacs-diffs digest, Vol 1 #3 - 17 msgs
Reply-to: address@hidden
To: address@hidden
Sender: address@hidden
Date: Sat, 10 Nov 2001 06:45:04 -0500
Send Emacs-diffs mailing list submissions to
address@hidden
To subscribe or unsubscribe via the World Wide Web, visit
http://mail.gnu.org/mailman/listinfo/emacs-diffs
or, via email, send a message with subject or body 'help' to
address@hidden
You can reach the person managing the list at
address@hidden
When replying, please edit your Subject line so it is more specific
than "Re: Contents of Emacs-diffs digest..."
Today's Topics:
1. Changes to emacs/lisp/ChangeLog (Sam Steingold)
2. Changes to emacs/lisp/emacs-lisp/debug.el (Sam Steingold)
3. Changes to emacs/lisp/ChangeLog (Richard M. Stallman)
4. Changes to emacs/lisp/textmodes/flyspell.el (Richard M. Stallman)
5. Changes to emacs/lisp/play/gomoku.el (=?iso-8859-1?Q?Pavel_Jan=EDk?=)
6. Changes to emacs/lisp/ChangeLog (=?iso-8859-1?Q?Pavel_Jan=EDk?=)
7. Changes to emacs/lisp/gnus/gnus.el (=?iso-8859-1?Q?Pavel_Jan=EDk?=)
8. Changes to emacs/lisp/gnus/ChangeLog (=?iso-8859-1?Q?Pavel_Jan=EDk?=)
9. Changes to emacs/etc/calccard.tex (Eli Zaretskii)
10. Changes to emacs/etc/calccard.ps (Eli Zaretskii)
11. Changes to emacs/etc/calccard.ps (Eli Zaretskii)
12. Changes to emacs/etc/NEWS (Eli Zaretskii)
13. Changes to emacs/etc/Makefile (Eli Zaretskii)
14. Changes to emacs/etc/ChangeLog (Eli Zaretskii)
15. Changes to emacs/lisp/ChangeLog (Per Abrahamsen)
16. Changes to emacs/lisp/wid-edit.el (Per Abrahamsen)
17. Changes to emacs/src/unexelf.c (Gerd Moellmann)
--__--__--
Message: 1
To: address@hidden
Reply-to: address@hidden
From: Sam Steingold <address@hidden>
Date: Fri, 09 Nov 2001 12:07:24 -0500
Subject: [Emacs-diffs] Changes to emacs/lisp/ChangeLog
Index: emacs/lisp/ChangeLog
diff -u emacs/lisp/ChangeLog:1.2990 emacs/lisp/ChangeLog:1.2991
--- emacs/lisp/ChangeLog:1.2990 Fri Nov 9 10:02:39 2001
+++ emacs/lisp/ChangeLog Fri Nov 9 12:07:24 2001
@@ -1,9 +1,14 @@
+2001-11-09 Sam Steingold <address@hidden>
+
+ * emacs-lisp/debug.el (debugger-make-xrefs):
+ Add buttons to all symbols.
+
2001-11-09 Andre Spiegel <address@hidden>
* vc.el: Add John David Smith to credits.
-
+
Suggested by Kalle Olavi Niemitalo <address@hidden>:
-
+
* vc-hooks.el (vc-error-occured): Backquotified.
(vc-file-prop-obarray): Use prime length for better efficiency.
--__--__--
Message: 2
To: address@hidden
Reply-to: address@hidden
From: Sam Steingold <address@hidden>
Date: Fri, 09 Nov 2001 12:07:25 -0500
Subject: [Emacs-diffs] Changes to emacs/lisp/emacs-lisp/debug.el
Index: emacs/lisp/emacs-lisp/debug.el
diff -u emacs/lisp/emacs-lisp/debug.el:1.46 emacs/lisp/emacs-lisp/debug.el:1.47
--- emacs/lisp/emacs-lisp/debug.el:1.46 Wed Oct 31 14:32:26 2001
+++ emacs/lisp/emacs-lisp/debug.el Fri Nov 9 12:07:24 2001
@@ -277,7 +277,7 @@
(set-buffer (or buffer (current-buffer)))
(goto-char (point-min))
(let ((buffer-read-only nil))
- (while (re-search-forward "^[* ] (?\\(\\(\\sw\\|\\s_\\)+\\)" nil t)
+ (while (re-search-forward "\\(\\(\\sw\\|\\s_\\)+\\)" nil t)
(let* ((sym (intern-soft (match-string 1)))
(file (symbol-file sym)))
(when file (help-xref-button 1 'help-function-def sym file)))))))
--__--__--
Message: 3
To: address@hidden
Reply-to: address@hidden
From: "Richard M. Stallman" <address@hidden>
Date: Fri, 09 Nov 2001 20:20:06 -0500
Subject: [Emacs-diffs] Changes to emacs/lisp/ChangeLog
Index: emacs/lisp/ChangeLog
diff -u emacs/lisp/ChangeLog:1.2991 emacs/lisp/ChangeLog:1.2992
--- emacs/lisp/ChangeLog:1.2991 Fri Nov 9 12:07:24 2001
+++ emacs/lisp/ChangeLog Fri Nov 9 20:20:05 2001
@@ -1,3 +1,18 @@
+2001-11-09 Richard M. Stallman <address@hidden>
+
+ * textmodes/flyspell.el: Use the keymap property
+ instead of local-map, and don't use a minor-mode map.
+ (flyspell-mode-map): Variable deleted.
+ Don't mess with minor-mode-map-alist.
+ (calling add-minor-mode): Specify nil for keymap.
+ And always use add-minor-mode, now that it exists.
+ (flyspell-overlay-keymap-property-name): Set it to `keymap'.
+ (flyspell-mode-on): Don't locally bind flyspell-mouse-map
+ or flyspell-local-mouse-map.
+ (make-flyspell-overlay): Use flyspell-mouse-map directly.
+ (flyspell-mode): Doc fix.
+ (flyspell-mode-on): Don't call make-local-hook.
+
2001-11-09 Sam Steingold <address@hidden>
* emacs-lisp/debug.el (debugger-make-xrefs):
@@ -34,6 +49,10 @@
* international/mule.el (make-translation-table): Doc fix.
Suggested by Alex Schroeder <address@hidden>.
+
+2001-11-07 Richard M. Stallman <address@hidden>
+
+ * info.el (Info-fontify-node): Highlight every third menu item.
2001-11-07 Per Abrahamsen <address@hidden>
--__--__--
Message: 4
To: address@hidden
Reply-to: address@hidden
From: "Richard M. Stallman" <address@hidden>
Date: Fri, 09 Nov 2001 20:20:22 -0500
Subject: [Emacs-diffs] Changes to emacs/lisp/textmodes/flyspell.el
Index: emacs/lisp/textmodes/flyspell.el
diff -u emacs/lisp/textmodes/flyspell.el:1.31
emacs/lisp/textmodes/flyspell.el:1.32
--- emacs/lisp/textmodes/flyspell.el:1.31 Mon Jul 16 08:22:59 2001
+++ emacs/lisp/textmodes/flyspell.el Fri Nov 9 20:20:22 2001
@@ -370,24 +370,8 @@
(define-key map "\M-\t" #'flyspell-auto-correct-word)))
map))
-;;;###autoload
-(defvar flyspell-mode-map (make-sparse-keymap))
-
-;; mouse, keyboard bindings and misc definition
-(when (or (assoc 'flyspell-mode minor-mode-map-alist)
- (setq minor-mode-map-alist
- (cons (cons 'flyspell-mode flyspell-mode-map)
- minor-mode-map-alist)))
- (define-key flyspell-mode-map "\M-\t" 'flyspell-auto-correct-word)
- (define-key flyspell-mode-map [(mouse-2)]
- (function flyspell-correct-word/local-keymap)))
-
-
;; the name of the overlay property that defines the keymap
-(defvar flyspell-overlay-keymap-property-name
- (if (string-match "19.*XEmacs" emacs-version)
- 'keymap
- 'local-map))
+(defvar flyspell-overlay-keymap-property-name 'keymap)
;; dash character machinery
(defvar flyspell-consider-dash-as-word-delimiter-flag nil
@@ -433,7 +417,7 @@
\\[flyspell-correct-word] (or mouse-2): popup correct words.
Hooks:
-flyspell-mode-hook is run after flyspell is entered.
+This runs `flyspell-mode-hook' after flyspell is entered.
Remark:
`flyspell-mode' uses `ispell-mode'. Thus all Ispell options are
@@ -445,9 +429,8 @@
\(add-hook 'tex-mode-hook (function (lambda () (setq ispell-parser 'tex))))
in your .emacs file.
-flyspell-region checks all words inside a region.
-
-flyspell-buffer checks the whole buffer."
+\\[flyspell-region] checks all words inside a region.
+\\[flyspell-buffer] checks the whole buffer."
(interactive "P")
(let ((old-flyspell-mode flyspell-mode))
;; Mark the mode as on or off.
@@ -465,21 +448,11 @@
;* Autoloading */
;*---------------------------------------------------------------------*/
;;;###autoload
-(if (fboundp 'add-minor-mode)
- (add-minor-mode 'flyspell-mode
- 'flyspell-mode-line-string
- flyspell-mode-map
- nil
- 'flyspell-mode)
- (or (assoc 'flyspell-mode minor-mode-alist)
- (setq minor-mode-alist
- (cons '(flyspell-mode flyspell-mode-line-string)
- minor-mode-alist)))
-
- (or (assoc 'flyspell-mode minor-mode-map-alist)
- (setq minor-mode-map-alist
- (cons (cons 'flyspell-mode flyspell-mode-map)
- minor-mode-map-alist))))
+(add-minor-mode 'flyspell-mode
+ 'flyspell-mode-line-string
+ nil
+ nil
+ 'flyspell-mode)
;*---------------------------------------------------------------------*/
;* flyspell-buffers ... */
@@ -532,10 +505,8 @@
;; we put the `flyspel-deplacement' property on some commands
(flyspell-deplacement-commands)
;; we bound flyspell action to post-command hook
- (make-local-hook 'post-command-hook)
(add-hook 'post-command-hook (function flyspell-post-command-hook) t t)
;; we bound flyspell action to pre-command hook
- (make-local-hook 'pre-command-hook)
(add-hook 'pre-command-hook (function flyspell-pre-command-hook) t t)
;; we bound flyspell action to after-change hook
(make-local-variable 'after-change-functions)
@@ -545,12 +516,6 @@
(let ((mode-predicate (get major-mode 'flyspell-mode-predicate)))
(if mode-predicate
(setq flyspell-generic-check-word-p mode-predicate)))
- ;; work around the fact that the `local-map' text-property replaces the
- ;; buffer's local map rather than shadowing it.
- (set (make-local-variable 'flyspell-mouse-map)
- (let ((map (copy-keymap flyspell-mouse-map)))
- (set-keymap-parent map (current-local-map))
- map))
;; the welcome message
(if (and flyspell-issue-welcome-flag (interactive-p))
(let ((binding (where-is-internal 'flyspell-auto-correct-word
@@ -560,16 +525,6 @@
(format "Welcome to flyspell. Use %s or Mouse-2 to correct words."
(key-description binding))
"Welcome to flyspell. Use Mouse-2 to correct words."))))
-
- ;; Use this so that we can still get major mode bindings at a
- ;; misspelled word (unless they're overridden by
- ;; `flyspell-mouse-map').
- (set (make-local-variable 'flyspell-local-mouse-map)
- (let ((map (copy-keymap flyspell-mouse-map)))
- (if (eq flyspell-emacs 'xemacs)
- (set-keymap-parents (list (current-local-map)))
- (set-keymap-parent map (current-local-map)))
- map))
;; we end with the flyspell hooks
(run-hooks 'flyspell-mode-hook))
@@ -1357,13 +1312,6 @@
(defun flyspell-region (beg end)
"Flyspell text between BEG and END."
(interactive "r")
- (unless (boundp 'flyspell-local-mouse-map)
- (set (make-local-variable 'flyspell-local-mouse-map)
- (let ((map (copy-keymap flyspell-mouse-map)))
- (if (eq flyspell-emacs 'xemacs)
- (set-keymap-parents (list (current-local-map)))
- (set-keymap-parent map (current-local-map)))
- map)))
(if (= beg end)
()
(save-excursion
@@ -1495,7 +1443,7 @@
(if flyspell-use-local-map
(overlay-put flyspell-overlay
flyspell-overlay-keymap-property-name
- flyspell-local-mouse-map))
+ flyspell-mouse-map))
flyspell-overlay))
;*---------------------------------------------------------------------*/
--__--__--
Message: 5
To: address@hidden
Reply-to: address@hidden
From: =?iso-8859-1?Q?Pavel_Jan=EDk?= <address@hidden>
Date: Sat, 10 Nov 2001 03:14:13 -0500
Subject: [Emacs-diffs] Changes to emacs/lisp/play/gomoku.el
Index: emacs/lisp/play/gomoku.el
diff -u emacs/lisp/play/gomoku.el:1.30 emacs/lisp/play/gomoku.el:1.31
--- emacs/lisp/play/gomoku.el:1.30 Tue Nov 6 14:39:19 2001
+++ emacs/lisp/play/gomoku.el Sat Nov 10 03:14:13 2001
@@ -80,6 +80,26 @@
:type 'hook
:group 'gomoku)
+;;;
+;;; CONSTANTS FOR BOARD
+;;;
+
+;; You may change these values if you have a small screen or if the squares
+;; look rectangular, but spacings SHOULD be at least 2 (MUST BE at least 1).
+
+(defconst gomoku-square-width 4
+ "*Horizontal spacing between squares on the Gomoku board.")
+
+(defconst gomoku-square-height 2
+ "*Vertical spacing between squares on the Gomoku board.")
+
+(defconst gomoku-x-offset 3
+ "*Number of columns between the Gomoku board and the side of the window.")
+
+(defconst gomoku-y-offset 1
+ "*Number of lines between the Gomoku board and the top of the window.")
+
+
(defvar gomoku-mode-map nil
"Local keymap to use in Gomoku mode.")
@@ -926,22 +946,6 @@
;;;
;;; DISPLAYING THE BOARD.
;;;
-
-;; You may change these values if you have a small screen or if the squares
-;; look rectangular, but spacings SHOULD be at least 2 (MUST BE at least 1).
-
-(defconst gomoku-square-width 4
- "*Horizontal spacing between squares on the Gomoku board.")
-
-(defconst gomoku-square-height 2
- "*Vertical spacing between squares on the Gomoku board.")
-
-(defconst gomoku-x-offset 3
- "*Number of columns between the Gomoku board and the side of the window.")
-
-(defconst gomoku-y-offset 1
- "*Number of lines between the Gomoku board and the top of the window.")
-
(defun gomoku-max-width ()
"Largest possible board width for the current window."
--__--__--
Message: 6
To: address@hidden
Reply-to: address@hidden
From: =?iso-8859-1?Q?Pavel_Jan=EDk?= <address@hidden>
Date: Sat, 10 Nov 2001 03:18:23 -0500
Subject: [Emacs-diffs] Changes to emacs/lisp/ChangeLog
Index: emacs/lisp/ChangeLog
diff -u emacs/lisp/ChangeLog:1.2992 emacs/lisp/ChangeLog:1.2993
--- emacs/lisp/ChangeLog:1.2992 Fri Nov 9 20:20:05 2001
+++ emacs/lisp/ChangeLog Sat Nov 10 03:18:23 2001
@@ -1,3 +1,8 @@
+2001-11-09 Pavel Janík <address@hidden>
+
+ * play/gomoku.el: Move definitions of constants to the beginning
+ of file, before their use.
+
2001-11-09 Richard M. Stallman <address@hidden>
* textmodes/flyspell.el: Use the keymap property
--__--__--
Message: 7
To: address@hidden
Reply-to: address@hidden
From: =?iso-8859-1?Q?Pavel_Jan=EDk?= <address@hidden>
Date: Sat, 10 Nov 2001 03:20:24 -0500
Subject: [Emacs-diffs] Changes to emacs/lisp/gnus/gnus.el
Index: emacs/lisp/gnus/gnus.el
diff -u emacs/lisp/gnus/gnus.el:1.21 emacs/lisp/gnus/gnus.el:1.22
--- emacs/lisp/gnus/gnus.el:1.21 Mon Sep 3 06:32:04 2001
+++ emacs/lisp/gnus/gnus.el Sat Nov 10 03:20:24 2001
@@ -1024,7 +1024,7 @@
(defcustom gnus-local-domain nil
"Local domain name without a host name.
The DOMAINNAME environment variable is used instead if it is defined.
-If the `system-name' function returns the full Internet name, there is
+If the function `system-name' returns the full Internet name, there is
no need to set this variable."
:group 'gnus-message
:type '(choice (const :tag "default" nil)
--__--__--
Message: 8
To: address@hidden
Reply-to: address@hidden
From: =?iso-8859-1?Q?Pavel_Jan=EDk?= <address@hidden>
Date: Sat, 10 Nov 2001 03:21:36 -0500
Subject: [Emacs-diffs] Changes to emacs/lisp/gnus/ChangeLog
Index: emacs/lisp/gnus/ChangeLog
diff -u emacs/lisp/gnus/ChangeLog:1.165 emacs/lisp/gnus/ChangeLog:1.166
--- emacs/lisp/gnus/ChangeLog:1.165 Wed Nov 7 06:48:22 2001
+++ emacs/lisp/gnus/ChangeLog Sat Nov 10 03:21:35 2001
@@ -1,3 +1,8 @@
+2001-11-10 Pavel Janík <address@hidden>
+
+ * gnus.el (gnus-local-domain): Reformat the doc-string to refer to
+ function `system-name' instead of both function and variable.
+
2001-11-07 ShengHuo ZHU <address@hidden>
* mml.el (mml-preview): Bind mail-header-separator.
--__--__--
Message: 9
To: address@hidden
Reply-to: address@hidden
From: Eli Zaretskii <address@hidden>
Date: Sat, 10 Nov 2001 05:33:11 -0500
Subject: [Emacs-diffs] Changes to emacs/etc/calccard.tex
--__--__--
Message: 10
To: address@hidden
Reply-to: address@hidden
From: Eli Zaretskii <address@hidden>
Date: Sat, 10 Nov 2001 05:33:47 -0500
Subject: [Emacs-diffs] Changes to emacs/etc/calccard.ps
--__--__--
Message: 11
To: address@hidden
Reply-to: address@hidden
From: Eli Zaretskii <address@hidden>
Date: Sat, 10 Nov 2001 05:35:44 -0500
Subject: [Emacs-diffs] Changes to emacs/etc/calccard.ps
Index: emacs/etc/calccard.ps
diff -u emacs/etc/calccard.ps:1.1 emacs/etc/calccard.ps:1.2
--- emacs/etc/calccard.ps:1.1 Sat Nov 10 05:33:47 2001
+++ emacs/etc/calccard.ps Sat Nov 10 05:35:43 2001
@@ -6,7 +6,7 @@
%%Orientation: Landscape
%%BoundingBox: 0 0 596 842
%%EndComments
-%DVIPSCommandLine: d:/usr/djgpp/bin/dvips.exe -t landscape -o
+%DVIPSCommandLine: dvips -t landscape -o
%+ calccard.ps calccard.dvi
%DVIPSParameters: dpi=600, compressed
%DVIPSSource: TeX output 2001.11.10:1219
--__--__--
Message: 12
To: address@hidden
Reply-to: address@hidden
From: Eli Zaretskii <address@hidden>
Date: Sat, 10 Nov 2001 05:37:58 -0500
Subject: [Emacs-diffs] Changes to emacs/etc/NEWS
Index: emacs/etc/NEWS
diff -u emacs/etc/NEWS:1.508 emacs/etc/NEWS:1.509
--- emacs/etc/NEWS:1.508 Fri Nov 9 05:40:51 2001
+++ emacs/etc/NEWS Sat Nov 10 05:37:58 2001
@@ -89,7 +89,8 @@
Calc is an advanced desk calculator and mathematical tool written in
Emacs Lisp. Its documentation is in a separate manual; within Emacs,
-type "C-h i m calc RET" to read that manual.
+type "C-h i m calc RET" to read that manual. A reference card is
+available in `etc/calccard.tex' and `etc/calccard.ps'.
*** The ruler-mode.el library provides a minor mode for displaying an
"active" ruler in the header line. You can use the mouse to visually
--__--__--
Message: 13
To: address@hidden
Reply-to: address@hidden
From: Eli Zaretskii <address@hidden>
Date: Sat, 10 Nov 2001 05:45:18 -0500
Subject: [Emacs-diffs] Changes to emacs/etc/Makefile
Index: emacs/etc/Makefile
diff -u emacs/etc/Makefile:1.5 emacs/etc/Makefile:1.6
--- emacs/etc/Makefile:1.5 Wed Apr 26 16:59:05 1995
+++ emacs/etc/Makefile Sat Nov 10 05:45:17 2001
@@ -7,14 +7,13 @@
all:
mostlyclean:
- -rm -f core
+ -rm -f core *.dvi *.log
clean distclean maintainer-clean:
- -rm -f DOC* core
+ -rm -f DOC* core *.dvi *.log
SOURCES = [0-9A-QS-Z]* README *.[ch16] emacs.* etags.* ledit.l ms-* \
- news.texi rc2log refcard.tex spook-lines termcap.* ulimit.hack \
- vcdiff vipcard.tex xmouse.doc
+ spook-lines tasks.texi termcap.* ulimit.hack *.tex
unlock:
chmod u+w $(SOURCES)
--__--__--
Message: 14
To: address@hidden
Reply-to: address@hidden
From: Eli Zaretskii <address@hidden>
Date: Sat, 10 Nov 2001 05:45:47 -0500
Subject: [Emacs-diffs] Changes to emacs/etc/ChangeLog
Index: emacs/etc/ChangeLog
diff -u emacs/etc/ChangeLog:1.90 emacs/etc/ChangeLog:1.91
--- emacs/etc/ChangeLog:1.90 Thu Nov 1 15:53:19 2001
+++ emacs/etc/ChangeLog Sat Nov 10 05:45:47 2001
@@ -1,3 +1,12 @@
+2001-11-10 Eli Zaretskii <address@hidden>
+
+ * Makefile (mostlyclean, clean, distclean, maintainer-clean):
+ Add *.dvi and *.log.
+ (SOURCES): Update the list of files.
+
+ * calccard.tex: New file.
+ * calccard.ps: New file.
+
2001-11-01 Eli Zaretskii <address@hidden>
* etags.1: Replace presentation-level troff macros that simulate
--__--__--
Message: 15
To: address@hidden
Reply-to: address@hidden
From: Per Abrahamsen <address@hidden>
Date: Sat, 10 Nov 2001 06:01:54 -0500
Subject: [Emacs-diffs] Changes to emacs/lisp/ChangeLog
Index: emacs/lisp/ChangeLog
diff -u emacs/lisp/ChangeLog:1.2993 emacs/lisp/ChangeLog:1.2994
--- emacs/lisp/ChangeLog:1.2993 Sat Nov 10 03:18:23 2001
+++ emacs/lisp/ChangeLog Sat Nov 10 06:01:53 2001
@@ -1,3 +1,9 @@
+2001-11-09 Per Abrahamsen <address@hidden>
+
+ * wid-edit.el (checklist): Removed `:menu-tag'.
+ (radio-button-choice): Ditto.
+ (editable-list): Ditto.
+
2001-11-09 Pavel Janík <address@hidden>
* play/gomoku.el: Move definitions of constants to the beginning
--__--__--
Message: 16
To: address@hidden
Reply-to: address@hidden
From: Per Abrahamsen <address@hidden>
Date: Sat, 10 Nov 2001 06:01:54 -0500
Subject: [Emacs-diffs] Changes to emacs/lisp/wid-edit.el
Index: emacs/lisp/wid-edit.el
diff -u emacs/lisp/wid-edit.el:1.100 emacs/lisp/wid-edit.el:1.101
--- emacs/lisp/wid-edit.el:1.100 Sat Oct 20 11:13:50 2001
+++ emacs/lisp/wid-edit.el Sat Nov 10 06:01:54 2001
@@ -2053,7 +2053,6 @@
:format "%v"
:offset 4
:entry-format "%b %v"
- :menu-tag "checklist"
:greedy nil
:value-create 'widget-checklist-value-create
:value-delete 'widget-children-value-delete
@@ -2231,7 +2230,6 @@
:offset 4
:format "%v"
:entry-format "%b %v"
- :menu-tag "radio"
:value-create 'widget-radio-value-create
:value-delete 'widget-children-value-delete
:value-get 'widget-radio-value-get
@@ -2421,7 +2419,6 @@
:format "%v%i\n"
:format-handler 'widget-editable-list-format-handler
:entry-format "%i %d %v"
- :menu-tag "editable-list"
:value-create 'widget-editable-list-value-create
:value-delete 'widget-children-value-delete
:value-get 'widget-editable-list-value-get
--__--__--
Message: 17
To: address@hidden
Reply-to: address@hidden
From: Gerd Moellmann <address@hidden>
Date: Sat, 10 Nov 2001 06:39:40 -0500
Subject: [Emacs-diffs] Changes to emacs/src/unexelf.c
Index: emacs/src/unexelf.c
diff -u emacs/src/unexelf.c:1.40 emacs/src/unexelf.c:1.41
--- emacs/src/unexelf.c:1.40 Mon Nov 5 17:17:42 2001
+++ emacs/src/unexelf.c Sat Nov 10 06:39:39 2001
@@ -668,6 +668,7 @@
int old_data_index, new_data2_index;
int old_mdebug_index;
struct stat stat_buf;
+ int old_file_size;
/* Open the old file, allocate a buffer of the right size, and read
in the file contents. */
@@ -680,16 +681,16 @@
if (fstat (old_file, &stat_buf) == -1)
fatal ("Can't fstat (%s): errno %d\n", old_name, errno);
- old_base = malloc (stat_buf.st_size);
-
- if (old_base == 0)
+ /* We cannot use malloc here because that may use sbrk. If it does,
+ we'd dump our temporary buffers with Emacs, and we'd have to be
+ extra careful to use the correct value of sbrk(0) after
+ allocating all buffers in the code below, which we aren't. */
+ old_file_size = stat_buf.st_size;
+ old_base = mmap (NULL, old_file_size, PROT_READ | PROT_WRITE,
+ MAP_ANON | MAP_PRIVATE, -1, 0);
+ if (old_base == (caddr_t) -1)
fatal ("Can't allocate buffer for %s\n", old_name);
-#ifdef DEBUG
- fprintf (stderr, "%s: malloc(%d) -> %x\n", old_name, stat_buf.st_size,
- old_base);
-#endif
-
if (read (old_file, old_base, stat_buf.st_size) != stat_buf.st_size)
fatal ("Didn't read all of %s: errno %d\n", old_name, errno);
@@ -774,16 +775,11 @@
if (ftruncate (new_file, new_file_size))
fatal ("Can't ftruncate (%s): errno %d\n", new_name, errno);
- new_base = malloc (new_file_size);
-
- if (new_base == 0)
+ new_base = mmap (NULL, new_file_size, PROT_READ | PROT_WRITE,
+ MAP_ANON | MAP_PRIVATE, -1, 0);
+ if (new_base == (caddr_t) -1)
fatal ("Can't allocate buffer for %s\n", old_name);
-#ifdef DEBUG
- fprintf (stderr, "%s: malloc(%d) -> %x\n", new_name, new_file_size
- new_base);
-#endif
-
new_file_h = (ElfW(Ehdr) *) new_base;
new_program_h = (ElfW(Phdr) *) ((byte *) new_base + old_file_h->e_phoff);
new_section_h = (ElfW(Shdr) *)
@@ -1202,8 +1198,8 @@
fatal ("Didn't write %d bytes to %s: errno %d\n",
new_file_size, new_base, errno);
- free (old_base);
- free (new_base);
+ munmap (old_base, old_file_size);
+ munmap (new_base, new_file_size);
/* Close the files and make the new file executable. */
--__--__--
_______________________________________________
Emacs-diffs mailing list
address@hidden
http://mail.gnu.org/mailman/listinfo/emacs-diffs
End of Emacs-diffs Digest
------- Start of forwarded message -------
From: address@hidden
Subject: Emacs-diffs digest, Vol 1 #4 - 12 msgs
Reply-to: address@hidden
To: address@hidden
Sender: address@hidden
Date: Sat, 10 Nov 2001 08:45:02 -0500
Send Emacs-diffs mailing list submissions to
address@hidden
To subscribe or unsubscribe via the World Wide Web, visit
http://mail.gnu.org/mailman/listinfo/emacs-diffs
or, via email, send a message with subject or body 'help' to
address@hidden
You can reach the person managing the list at
address@hidden
When replying, please edit your Subject line so it is more specific
than "Re: Contents of Emacs-diffs digest..."
Today's Topics:
1. Changes to emacs/src/ChangeLog (Gerd Moellmann)
2. Changes to emacs/src/unexelf.c (Gerd Moellmann)
3. Changes to emacs/src/ChangeLog (Gerd Moellmann)
4. Changes to emacs/src/unexelf.c (Gerd Moellmann)
5. Changes to emacs/src/w32term.h (Jason Rumney)
6. Changes to emacs/src/w32term.c (Jason Rumney)
7. Changes to emacs/src/w32fns.c (Jason Rumney)
8. Changes to emacs/src/w32menu.c (Jason Rumney)
9. Changes to emacs/src/ChangeLog (Jason Rumney)
10. Changes to emacs/etc/PROBLEMS (Richard M. Stallman)
11. Changes to emacs/lisp/term/w32-win.el (Jason Rumney)
12. Changes to emacs/lisp/ChangeLog (Jason Rumney)
- --__--__--
Message: 1
To: address@hidden
Reply-to: address@hidden
From: Gerd Moellmann <address@hidden>
Date: Sat, 10 Nov 2001 06:40:05 -0500
Subject: [Emacs-diffs] Changes to emacs/src/ChangeLog
Index: emacs/src/ChangeLog
diff -u emacs/src/ChangeLog:1.2184 emacs/src/ChangeLog:1.2185
- --- emacs/src/ChangeLog:1.2184 Fri Nov 9 03:02:08 2001
+++ emacs/src/ChangeLog Sat Nov 10 06:40:04 2001
@@ -1,3 +1,8 @@
+2001-11-10 Gerd Moellmann <address@hidden>
+
+ * unexelf.c (unexec): Use mmap/munmap to allocate buffers
+ instead of malloc/free.
+
2001-11-09 Pavel Janík <address@hidden>
* xfaces.c (merge_face_vectors): Use braces to follow GNU
- --__--__--
Message: 2
To: address@hidden
Reply-to: address@hidden
From: Gerd Moellmann <address@hidden>
Date: Sat, 10 Nov 2001 06:42:12 -0500
Subject: [Emacs-diffs] Changes to emacs/src/unexelf.c
Index: emacs/src/unexelf.c
diff -u emacs/src/unexelf.c:1.40 emacs/src/unexelf.c:1.41
- --- emacs/src/unexelf.c:1.40 Mon Nov 5 17:17:42 2001
+++ emacs/src/unexelf.c Sat Nov 10 06:39:39 2001
@@ -668,6 +668,7 @@
int old_data_index, new_data2_index;
int old_mdebug_index;
struct stat stat_buf;
+ int old_file_size;
/* Open the old file, allocate a buffer of the right size, and read
in the file contents. */
@@ -680,16 +681,16 @@
if (fstat (old_file, &stat_buf) == -1)
fatal ("Can't fstat (%s): errno %d\n", old_name, errno);
- - old_base = malloc (stat_buf.st_size);
- -
- - if (old_base == 0)
+ /* We cannot use malloc here because that may use sbrk. If it does,
+ we'd dump our temporary buffers with Emacs, and we'd have to be
+ extra careful to use the correct value of sbrk(0) after
+ allocating all buffers in the code below, which we aren't. */
+ old_file_size = stat_buf.st_size;
+ old_base = mmap (NULL, old_file_size, PROT_READ | PROT_WRITE,
+ MAP_ANON | MAP_PRIVATE, -1, 0);
+ if (old_base == (caddr_t) -1)
fatal ("Can't allocate buffer for %s\n", old_name);
- -#ifdef DEBUG
- - fprintf (stderr, "%s: malloc(%d) -> %x\n", old_name, stat_buf.st_size,
- - old_base);
- -#endif
- -
if (read (old_file, old_base, stat_buf.st_size) != stat_buf.st_size)
fatal ("Didn't read all of %s: errno %d\n", old_name, errno);
@@ -774,16 +775,11 @@
if (ftruncate (new_file, new_file_size))
fatal ("Can't ftruncate (%s): errno %d\n", new_name, errno);
- - new_base = malloc (new_file_size);
- -
- - if (new_base == 0)
+ new_base = mmap (NULL, new_file_size, PROT_READ | PROT_WRITE,
+ MAP_ANON | MAP_PRIVATE, -1, 0);
+ if (new_base == (caddr_t) -1)
fatal ("Can't allocate buffer for %s\n", old_name);
- -#ifdef DEBUG
- - fprintf (stderr, "%s: malloc(%d) -> %x\n", new_name, new_file_size
- - new_base);
- -#endif
- -
new_file_h = (ElfW(Ehdr) *) new_base;
new_program_h = (ElfW(Phdr) *) ((byte *) new_base + old_file_h->e_phoff);
new_section_h = (ElfW(Shdr) *)
@@ -1202,8 +1198,8 @@
fatal ("Didn't write %d bytes to %s: errno %d\n",
new_file_size, new_base, errno);
- - free (old_base);
- - free (new_base);
+ munmap (old_base, old_file_size);
+ munmap (new_base, new_file_size);
/* Close the files and make the new file executable. */
- --__--__--
Message: 3
To: address@hidden
Reply-to: address@hidden
From: Gerd Moellmann <address@hidden>
Date: Sat, 10 Nov 2001 06:42:38 -0500
Subject: [Emacs-diffs] Changes to emacs/src/ChangeLog
Index: emacs/src/ChangeLog
diff -u emacs/src/ChangeLog:1.2184 emacs/src/ChangeLog:1.2185
- --- emacs/src/ChangeLog:1.2184 Fri Nov 9 03:02:08 2001
+++ emacs/src/ChangeLog Sat Nov 10 06:40:04 2001
@@ -1,3 +1,8 @@
+2001-11-10 Gerd Moellmann <address@hidden>
+
+ * unexelf.c (unexec): Use mmap/munmap to allocate buffers
+ instead of malloc/free.
+
2001-11-09 Pavel Janík <address@hidden>
* xfaces.c (merge_face_vectors): Use braces to follow GNU
- --__--__--
Message: 4
To: address@hidden
Reply-to: address@hidden
From: Gerd Moellmann <address@hidden>
Date: Sat, 10 Nov 2001 06:43:07 -0500
Subject: [Emacs-diffs] Changes to emacs/src/unexelf.c
Index: emacs/src/unexelf.c
diff -u emacs/src/unexelf.c:1.41 emacs/src/unexelf.c:1.42
- --- emacs/src/unexelf.c:1.41 Sat Nov 10 06:39:39 2001
+++ emacs/src/unexelf.c Sat Nov 10 06:43:07 2001
@@ -1,4 +1,4 @@
- -/* Copyright (C) 1985, 1986, 1987, 1988, 1990, 1992, 1999, 2000
+/* Copyright (C) 1985, 1986, 1987, 1988, 1990, 1992, 1999, 2000, 2001
Free Software Foundation, Inc.
This file is part of GNU Emacs.
- --__--__--
Message: 5
To: address@hidden
Reply-to: address@hidden
From: Jason Rumney <address@hidden>
Date: Sat, 10 Nov 2001 08:18:41 -0500
Subject: [Emacs-diffs] Changes to emacs/src/w32term.h
Index: emacs/src/w32term.h
diff -u emacs/src/w32term.h:1.35 emacs/src/w32term.h:1.36
- --- emacs/src/w32term.h:1.35 Sun Oct 21 12:57:22 2001
+++ emacs/src/w32term.h Sat Oct 27 18:07:59 2001
@@ -731,7 +731,9 @@
#define WM_EMACS_REGISTER_HOT_KEY (WM_EMACS_START + 12)
#define WM_EMACS_UNREGISTER_HOT_KEY (WM_EMACS_START + 13)
#define WM_EMACS_TOGGLE_LOCK_KEY (WM_EMACS_START + 14)
- -#define WM_EMACS_END (WM_EMACS_START + 15)
+#define WM_EMACS_TRACK_CARET (WM_EMACS_START + 15)
+#define WM_EMACS_DESTROY_CARET (WM_EMACS_START + 16)
+#define WM_EMACS_END (WM_EMACS_START + 17)
#define WND_FONTWIDTH_INDEX (0)
#define WND_LINEHEIGHT_INDEX (4)
- --__--__--
Message: 6
To: address@hidden
Reply-to: address@hidden
From: Jason Rumney <address@hidden>
Date: Sat, 10 Nov 2001 08:20:57 -0500
Subject: [Emacs-diffs] Changes to emacs/src/w32term.c
Index: emacs/src/w32term.c
diff -u emacs/src/w32term.c:1.122 emacs/src/w32term.c:1.123
- --- emacs/src/w32term.c:1.122 Mon Nov 5 10:02:13 2001
+++ emacs/src/w32term.c Wed Nov 7 16:11:00 2001
@@ -9604,31 +9604,33 @@
and speech synthesizers can follow the cursor. */
if (active_cursor)
{
- - HWND hwnd = FRAME_W32_WINDOW (f);
- -
struct glyph * cursor_glyph = get_phys_cursor_glyph (w);
- - int caret_width = cursor_glyph->pixel_width;
- - w32_system_caret_x
- - = WINDOW_TEXT_TO_FRAME_PIXEL_X (w, w->phys_cursor.x);
- - w32_system_caret_y
- - = (WINDOW_TO_FRAME_PIXEL_Y (w, w->phys_cursor.y)
- - + glyph_row->ascent - w->phys_cursor_ascent);
+ if (cursor_glyph)
+ {
+ HWND hwnd = FRAME_W32_WINDOW (f);
+ int caret_width = cursor_glyph->pixel_width;
+ w32_system_caret_x
+ = WINDOW_TEXT_TO_FRAME_PIXEL_X (w, w->phys_cursor.x);
+ w32_system_caret_y
+ = (WINDOW_TO_FRAME_PIXEL_Y (w, w->phys_cursor.y)
+ + glyph_row->ascent - w->phys_cursor_ascent);
- - /* If the size of the active cursor changed, destroy the old
- - system caret. */
- - if (w32_system_caret_hwnd
- - && (w32_system_caret_height != w->phys_cursor_height
- - || w32_system_caret_width != caret_width))
- - PostMessage (hwnd, WM_EMACS_DESTROY_CARET, NULL, NULL);
+ /* If the size of the active cursor changed, destroy the old
+ system caret. */
+ if (w32_system_caret_hwnd
+ && (w32_system_caret_height != w->phys_cursor_height
+ || w32_system_caret_width != caret_width))
+ PostMessage (hwnd, WM_EMACS_DESTROY_CARET, NULL, NULL);
- - if (!w32_system_caret_hwnd)
- - {
- - w32_system_caret_height = w->phys_cursor_height;
- - w32_system_caret_width = caret_width;
- - }
+ if (!w32_system_caret_hwnd)
+ {
+ w32_system_caret_height = w->phys_cursor_height;
+ w32_system_caret_width = caret_width;
+ }
- - /* Move the system caret. */
- - PostMessage (hwnd, WM_EMACS_TRACK_CARET, NULL, NULL);
+ /* Move the system caret. */
+ PostMessage (hwnd, WM_EMACS_TRACK_CARET, NULL, NULL);
+ }
}
switch (new_cursor_type)
- --__--__--
Message: 7
To: address@hidden
Reply-to: address@hidden
From: Jason Rumney <address@hidden>
Date: Sat, 10 Nov 2001 08:24:02 -0500
Subject: [Emacs-diffs] Changes to emacs/src/w32fns.c
Index: emacs/src/w32fns.c
diff -u emacs/src/w32fns.c:1.129 emacs/src/w32fns.c:1.130
- --- emacs/src/w32fns.c:1.129 Tue Oct 30 17:22:04 2001
+++ emacs/src/w32fns.c Fri Nov 2 15:45:57 2001
@@ -342,7 +342,7 @@
if (NILP (frame))
frame = selected_frame;
- - CHECK_LIVE_FRAME (frame, 0);
+ CHECK_LIVE_FRAME (frame);
f = XFRAME (frame);
if (! FRAME_W32_P (f))
error ("non-w32 frame used");
@@ -372,7 +372,7 @@
{
FRAME_PTR f;
- - CHECK_LIVE_FRAME (frame, 0);
+ CHECK_LIVE_FRAME (frame);
f = XFRAME (frame);
if (! FRAME_W32_P (f))
error ("non-w32 frame used");
@@ -1079,10 +1079,10 @@
Lisp_Object oldrgb = Qnil;
Lisp_Object entry;
- - CHECK_NUMBER (red, 0);
- - CHECK_NUMBER (green, 0);
- - CHECK_NUMBER (blue, 0);
- - CHECK_STRING (name, 0);
+ CHECK_NUMBER (red);
+ CHECK_NUMBER (green);
+ CHECK_NUMBER (blue);
+ CHECK_STRING (name);
XSET (rgb, Lisp_Int, RGB(XUINT (red), XUINT (green), XUINT (blue)));
@@ -1120,7 +1120,7 @@
Lisp_Object cmap = Qnil;
Lisp_Object abspath;
- - CHECK_STRING (filename, 0);
+ CHECK_STRING (filename);
abspath = Fexpand_file_name (filename, Qnil);
fp = fopen (XSTRING (filename)->data, "rt");
@@ -1432,7 +1432,7 @@
{
Lisp_Object color;
- - CHECK_NUMBER (rgb, 0);
+ CHECK_NUMBER (rgb);
BLOCK_INPUT;
@@ -1891,7 +1891,7 @@
{
XColor cdef;
- - CHECK_STRING (arg, 0);
+ CHECK_STRING (arg);
if (strcmp (XSTRING (arg)->data, "black") == 0)
return BLACK_PIX_DEFAULT (f);
@@ -2029,7 +2029,7 @@
if (!EQ (Qnil, Vx_pointer_shape))
{
- - CHECK_NUMBER (Vx_pointer_shape, 0);
+ CHECK_NUMBER (Vx_pointer_shape);
cursor = XCreateFontCursor (FRAME_W32_DISPLAY (f), XINT
(Vx_pointer_shape));
}
else
@@ -2038,7 +2038,7 @@
if (!EQ (Qnil, Vx_nontext_pointer_shape))
{
- - CHECK_NUMBER (Vx_nontext_pointer_shape, 0);
+ CHECK_NUMBER (Vx_nontext_pointer_shape);
nontext_cursor = XCreateFontCursor (FRAME_W32_DISPLAY (f),
XINT (Vx_nontext_pointer_shape));
}
@@ -2048,7 +2048,7 @@
if (!EQ (Qnil, Vx_hourglass_pointer_shape))
{
- - CHECK_NUMBER (Vx_hourglass_pointer_shape, 0);
+ CHECK_NUMBER (Vx_hourglass_pointer_shape);
hourglass_cursor = XCreateFontCursor (FRAME_W32_DISPLAY (f),
XINT (Vx_hourglass_pointer_shape));
}
@@ -2059,7 +2059,7 @@
x_check_errors (FRAME_W32_DISPLAY (f), "bad nontext pointer cursor: %s");
if (!EQ (Qnil, Vx_mode_pointer_shape))
{
- - CHECK_NUMBER (Vx_mode_pointer_shape, 0);
+ CHECK_NUMBER (Vx_mode_pointer_shape);
mode_cursor = XCreateFontCursor (FRAME_W32_DISPLAY (f),
XINT (Vx_mode_pointer_shape));
}
@@ -2069,7 +2069,7 @@
if (!EQ (Qnil, Vx_sensitive_text_pointer_shape))
{
- - CHECK_NUMBER (Vx_sensitive_text_pointer_shape, 0);
+ CHECK_NUMBER (Vx_sensitive_text_pointer_shape);
cross_cursor
= XCreateFontCursor (FRAME_W32_DISPLAY (f),
XINT (Vx_sensitive_text_pointer_shape));
@@ -2079,7 +2079,7 @@
if (!NILP (Vx_window_horizontal_drag_shape))
{
- - CHECK_NUMBER (Vx_window_horizontal_drag_shape, 0);
+ CHECK_NUMBER (Vx_window_horizontal_drag_shape);
horizontal_drag_cursor
= XCreateFontCursor (FRAME_X_DISPLAY (f),
XINT (Vx_window_horizontal_drag_shape));
@@ -2222,7 +2222,7 @@
{
int pix;
- - CHECK_STRING (arg, 0);
+ CHECK_STRING (arg);
pix = x_decode_color (f, arg, BLACK_PIX_DEFAULT (f));
x_set_border_pixel (f, pix);
update_face_from_frame_parameter (f, Qborder_color, arg);
@@ -2384,7 +2384,7 @@
Lisp_Object frame;
int old_fontset = FRAME_FONTSET(f);
- - CHECK_STRING (arg, 1);
+ CHECK_STRING (arg);
fontset_name = Fquery_fontset (arg, Qnil);
@@ -2435,7 +2435,7 @@
struct frame *f;
Lisp_Object arg, oldval;
{
- - CHECK_NUMBER (arg, 0);
+ CHECK_NUMBER (arg);
if (XINT (arg) == f->output_data.w32->border_width)
return;
@@ -2453,7 +2453,7 @@
{
int old = f->output_data.w32->internal_border_width;
- - CHECK_NUMBER (arg, 0);
+ CHECK_NUMBER (arg);
f->output_data.w32->internal_border_width = XINT (arg);
if (f->output_data.w32->internal_border_width < 0)
f->output_data.w32->internal_border_width = 0;
@@ -2675,7 +2675,7 @@
name = build_string (FRAME_W32_DISPLAY_INFO (f)->w32_id_name);
}
else
- - CHECK_STRING (name, 0);
+ CHECK_STRING (name);
/* Don't change the name if it's already NAME. */
if (! NILP (Fstring_equal (name, f->name)))
@@ -2931,13 +2931,13 @@
char *name_key;
char *class_key;
- - CHECK_STRING (attribute, 0);
- - CHECK_STRING (class, 0);
+ CHECK_STRING (attribute);
+ CHECK_STRING (class);
if (!NILP (component))
- - CHECK_STRING (component, 1);
+ CHECK_STRING (component);
if (!NILP (subclass))
- - CHECK_STRING (subclass, 2);
+ CHECK_STRING (subclass);
if (NILP (component) != NILP (subclass))
error ("x-get-resource: must specify both COMPONENT and SUBCLASS or
neither");
@@ -3140,7 +3140,7 @@
unsigned int width, height;
Lisp_Object result;
- - CHECK_STRING (string, 0);
+ CHECK_STRING (string);
geometry = XParseGeometry ((char *) XSTRING (string)->data,
&x, &y, &width, &height);
@@ -3218,12 +3218,12 @@
{
if (!EQ (tem0, Qunbound))
{
- - CHECK_NUMBER (tem0, 0);
+ CHECK_NUMBER (tem0);
f->height = XINT (tem0);
}
if (!EQ (tem1, Qunbound))
{
- - CHECK_NUMBER (tem1, 0);
+ CHECK_NUMBER (tem1);
SET_FRAME_WIDTH (f, XINT (tem1));
}
if (!NILP (tem2) && !EQ (tem2, Qunbound))
@@ -3270,7 +3270,7 @@
f->output_data.w32->top_pos = 0;
else
{
- - CHECK_NUMBER (tem0, 0);
+ CHECK_NUMBER (tem0);
f->output_data.w32->top_pos = XINT (tem0);
if (f->output_data.w32->top_pos < 0)
window_prompting |= YNegative;
@@ -3298,7 +3298,7 @@
f->output_data.w32->left_pos = 0;
else
{
- - CHECK_NUMBER (tem1, 0);
+ CHECK_NUMBER (tem1);
f->output_data.w32->left_pos = XINT (tem1);
if (f->output_data.w32->left_pos < 0)
window_prompting |= XNegative;
@@ -5095,8 +5095,8 @@
icon_y = w32_get_arg (parms, Qicon_top, 0, 0, RES_TYPE_NUMBER);
if (!EQ (icon_x, Qunbound) && !EQ (icon_y, Qunbound))
{
- - CHECK_NUMBER (icon_x, 0);
- - CHECK_NUMBER (icon_y, 0);
+ CHECK_NUMBER (icon_x);
+ CHECK_NUMBER (icon_y);
}
else if (!EQ (icon_x, Qunbound) || !EQ (icon_y, Qunbound))
error ("Both left and top icon corners of icon must be specified");
@@ -5239,7 +5239,7 @@
if (EQ (parent, Qunbound))
parent = Qnil;
if (! NILP (parent))
- - CHECK_NUMBER (parent, 0);
+ CHECK_NUMBER (parent);
/* make_frame_without_minibuffer can run Lisp code and garbage collect. */
/* No need to protect DISPLAY because that's not used after passing
@@ -7208,7 +7208,7 @@
XColor foo;
FRAME_PTR f = check_x_frame (frame);
- - CHECK_STRING (color, 1);
+ CHECK_STRING (color);
if (w32_defined_color (f, XSTRING (color)->data, &foo, 0))
return Qt;
@@ -7224,7 +7224,7 @@
XColor foo;
FRAME_PTR f = check_x_frame (frame);
- - CHECK_STRING (color, 1);
+ CHECK_STRING (color);
if (w32_defined_color (f, XSTRING (color)->data, &foo, 0))
{
@@ -7534,7 +7534,7 @@
Lisp_Object names;
struct w32_display_info *dpyinfo;
- - CHECK_STRING (name, 0);
+ CHECK_STRING (name);
for (dpyinfo = &one_w32_display_info, names = w32_display_name_list;
dpyinfo;
@@ -7575,9 +7575,9 @@
unsigned char *xrm_option;
struct w32_display_info *dpyinfo;
- - CHECK_STRING (display, 0);
+ CHECK_STRING (display);
if (! NILP (xrm_string))
- - CHECK_STRING (xrm_string, 1);
+ CHECK_STRING (xrm_string);
if (! EQ (Vwindow_system, intern ("w32")))
error ("Not using Microsoft Windows");
@@ -12465,8 +12465,8 @@
struct frame *f = check_x_frame (frame);
Atom prop_atom;
- - CHECK_STRING (prop, 1);
- - CHECK_STRING (value, 2);
+ CHECK_STRING (prop);
+ CHECK_STRING (value);
BLOCK_INPUT;
prop_atom = XInternAtom (FRAME_W32_DISPLAY (f), XSTRING (prop)->data, False);
@@ -12496,7 +12496,7 @@
struct frame *f = check_x_frame (frame);
Atom prop_atom;
- - CHECK_STRING (prop, 1);
+ CHECK_STRING (prop);
BLOCK_INPUT;
prop_atom = XInternAtom (FRAME_W32_DISPLAY (f), XSTRING (prop)->data, False);
XDeleteProperty (FRAME_W32_DISPLAY (f), FRAME_W32_WINDOW (f), prop_atom);
@@ -12530,7 +12530,7 @@
int actual_format;
unsigned long actual_size, bytes_remaining;
- - CHECK_STRING (prop, 1);
+ CHECK_STRING (prop);
BLOCK_INPUT;
prop_atom = XInternAtom (FRAME_W32_DISPLAY (f), XSTRING (prop)->data, False);
rc = XGetWindowProperty (FRAME_W32_DISPLAY (f), FRAME_W32_WINDOW (f),
@@ -13177,22 +13177,22 @@
GCPRO4 (string, parms, frame, timeout);
- - CHECK_STRING (string, 0);
+ CHECK_STRING (string);
f = check_x_frame (frame);
if (NILP (timeout))
timeout = make_number (5);
else
- - CHECK_NATNUM (timeout, 2);
+ CHECK_NATNUM (timeout);
if (NILP (dx))
dx = make_number (5);
else
- - CHECK_NUMBER (dx, 5);
+ CHECK_NUMBER (dx);
if (NILP (dy))
dy = make_number (-10);
else
- - CHECK_NUMBER (dy, 6);
+ CHECK_NUMBER (dy);
if (NILP (last_show_tip_args))
last_show_tip_args = Fmake_vector (make_number (3), Qnil);
@@ -13406,8 +13406,8 @@
int use_dialog_p = 1;
GCPRO5 (prompt, dir, default_filename, mustmatch, file);
- - CHECK_STRING (prompt, 0);
- - CHECK_STRING (dir, 1);
+ CHECK_STRING (prompt);
+ CHECK_STRING (dir);
/* Create the dialog with PROMPT as title, using DIR as initial
directory and using "*" as pattern. */
@@ -13589,7 +13589,7 @@
{
FRAME_PTR f = check_x_frame (frame);
- - CHECK_NUMBER (command, 0);
+ CHECK_NUMBER (command);
PostMessage (FRAME_W32_WINDOW (f), WM_SYSCOMMAND, XINT (command), 0);
@@ -13621,7 +13621,7 @@
{
Lisp_Object current_dir;
- - CHECK_STRING (document, 0);
+ CHECK_STRING (document);
/* Encode filename and current directory. */
current_dir = ENCODE_FILE (current_buffer->directory);
@@ -13669,7 +13669,7 @@
int w32_modifiers;
struct gcpro gcpro1;
- - CHECK_VECTOR (key, 0);
+ CHECK_VECTOR (key);
if (XFASTINT (Flength (key)) != 1)
return Qnil;
@@ -13807,7 +13807,7 @@
int vk_code, w32_modifiers;
Lisp_Object key;
- - CHECK_NUMBER (hotkeyid, 0);
+ CHECK_NUMBER (hotkeyid);
vk_code = HOTKEY_VK_CODE (hotkeyid);
w32_modifiers = HOTKEY_MODIFIERS (hotkeyid);
@@ -13873,7 +13873,7 @@
{
Lisp_Object encoded, value;
- - CHECK_STRING (filename, 0);
+ CHECK_STRING (filename);
filename = Fexpand_file_name (filename, Qnil);
encoded = ENCODE_FILE (filename);
- --__--__--
Message: 8
To: address@hidden
Reply-to: address@hidden
From: Jason Rumney <address@hidden>
Date: Sat, 10 Nov 2001 08:25:12 -0500
Subject: [Emacs-diffs] Changes to emacs/src/w32menu.c
Index: emacs/src/w32menu.c
diff -u emacs/src/w32menu.c:1.41 emacs/src/w32menu.c:1.42
- --- emacs/src/w32menu.c:1.41 Mon Oct 29 22:38:24 2001
+++ emacs/src/w32menu.c Fri Nov 2 15:35:06 2001
@@ -548,10 +548,10 @@
Lisp_Object elt, pane_name, pane_data;
elt = Fcar (tail);
pane_name = Fcar (elt);
- - CHECK_STRING (pane_name, 0);
+ CHECK_STRING (pane_name);
push_menu_pane (pane_name, Qnil);
pane_data = Fcdr (elt);
- - CHECK_CONS (pane_data, 0);
+ CHECK_CONS (pane_data);
list_of_items (pane_data);
}
@@ -575,9 +575,9 @@
push_left_right_boundary ();
else
{
- - CHECK_CONS (item, 0);
+ CHECK_CONS (item);
item1 = Fcar (item);
- - CHECK_STRING (item1, 1);
+ CHECK_STRING (item1);
push_menu_item (item1, Qt, Fcdr (item), Qt, Qnil, Qnil, Qnil, Qnil);
}
}
@@ -678,8 +678,8 @@
}
}
- - CHECK_NUMBER (x, 0);
- - CHECK_NUMBER (y, 0);
+ CHECK_NUMBER (x);
+ CHECK_NUMBER (y);
/* Decode where to put the menu. */
@@ -691,7 +691,7 @@
}
else if (WINDOWP (window))
{
- - CHECK_LIVE_WINDOW (window, 0);
+ CHECK_LIVE_WINDOW (window);
f = XFRAME (WINDOW_FRAME (XWINDOW (window)));
xpos = (FONT_WIDTH (FRAME_FONT (f))
@@ -702,7 +702,7 @@
else
/* ??? Not really clean; should be CHECK_WINDOW_OR_FRAME,
but I don't want to make one now. */
- - CHECK_WINDOW (window, 0);
+ CHECK_WINDOW (window);
xpos += XINT (x);
ypos += XINT (y);
@@ -774,7 +774,7 @@
{
/* We were given an old-fashioned menu. */
title = Fcar (menu);
- - CHECK_STRING (title, 1);
+ CHECK_STRING (title);
list_of_panes (Fcdr (menu));
@@ -875,13 +875,13 @@
f = XFRAME (window);
else if (WINDOWP (window))
{
- - CHECK_LIVE_WINDOW (window, 0);
+ CHECK_LIVE_WINDOW (window);
f = XFRAME (WINDOW_FRAME (XWINDOW (window)));
}
else
/* ??? Not really clean; should be CHECK_WINDOW_OR_FRAME,
but I don't want to make one now. */
- - CHECK_WINDOW (window, 0);
+ CHECK_WINDOW (window);
#ifndef HAVE_DIALOGS
/* Display a menu with these alternatives
@@ -904,7 +904,7 @@
/* Decode the dialog items from what was specified. */
title = Fcar (contents);
- - CHECK_STRING (title, 1);
+ CHECK_STRING (title);
list_of_panes (Fcons (contents, Qnil));
- --__--__--
Message: 9
To: address@hidden
Reply-to: address@hidden
From: Jason Rumney <address@hidden>
Date: Sat, 10 Nov 2001 08:27:23 -0500
Subject: [Emacs-diffs] Changes to emacs/src/ChangeLog
Index: emacs/src/ChangeLog
diff -u emacs/src/ChangeLog:1.2184 emacs/src/ChangeLog:1.2185
- --- emacs/src/ChangeLog:1.2184 Fri Nov 9 03:02:08 2001
+++ emacs/src/ChangeLog Sat Nov 10 06:40:04 2001
@@ -1,3 +1,8 @@
+2001-11-10 Gerd Moellmann <address@hidden>
+
+ * unexelf.c (unexec): Use mmap/munmap to allocate buffers
+ instead of malloc/free.
+
2001-11-09 Pavel Janík <address@hidden>
* xfaces.c (merge_face_vectors): Use braces to follow GNU
- --__--__--
Message: 10
To: address@hidden
Reply-to: address@hidden
From: "Richard M. Stallman" <address@hidden>
Date: Sat, 10 Nov 2001 08:30:05 -0500
Subject: [Emacs-diffs] Changes to emacs/etc/PROBLEMS
Index: emacs/etc/PROBLEMS
diff -u emacs/etc/PROBLEMS:1.81 emacs/etc/PROBLEMS:1.82
- --- emacs/etc/PROBLEMS:1.81 Thu Nov 1 09:07:22 2001
+++ emacs/etc/PROBLEMS Sat Nov 10 08:30:05 2001
@@ -200,6 +200,12 @@
is probably a bug in Xaw3d; when Xaw3d is compiled with arrows, the
problem disappears.
+* There are known binary incompatibilities between Xaw, Xaw3d, neXtaw,
+XawM and the few other derivatives of Xaw. So when you compile with
+one of these, it may not work to dynamically link with another one.
+If you try it and it does not work, try rebuilding Emacs with the
+toolkit version you actually want to use.
+
* Clicking C-mouse-2 in the scroll bar doesn't split the window.
This currently doesn't work with scroll-bar widgets (and we don't know
- --__--__--
Message: 11
To: address@hidden
Reply-to: address@hidden
From: Jason Rumney <address@hidden>
Date: Sat, 10 Nov 2001 08:36:53 -0500
Subject: [Emacs-diffs] Changes to emacs/lisp/term/w32-win.el
Index: emacs/lisp/term/w32-win.el
diff -u emacs/lisp/term/w32-win.el:1.43 emacs/lisp/term/w32-win.el:1.44
- --- emacs/lisp/term/w32-win.el:1.43 Mon Jul 16 07:39:41 2001
+++ emacs/lisp/term/w32-win.el Sun Oct 21 13:15:18 2001
@@ -79,10 +79,6 @@
(if (fboundp 'new-fontset)
(require 'fontset))
- -;; FIXME: this is temporary for v21.1, since many redisplay problems
- -;; happen if redisplay-dont-pause is nil.
- -(setq redisplay-dont-pause t)
- -
;; Because Windows scrollbars look and act quite differently compared
;; with the standard X scroll-bars, we don't try to use the normal
;; scroll bar routines.
- --__--__--
Message: 12
To: address@hidden
Reply-to: address@hidden
From: Jason Rumney <address@hidden>
Date: Sat, 10 Nov 2001 08:40:50 -0500
Subject: [Emacs-diffs] Changes to emacs/lisp/ChangeLog
Index: emacs/lisp/ChangeLog
diff -u emacs/lisp/ChangeLog:1.2993 emacs/lisp/ChangeLog:1.2994
- --- emacs/lisp/ChangeLog:1.2993 Sat Nov 10 03:18:23 2001
+++ emacs/lisp/ChangeLog Sat Nov 10 06:01:53 2001
@@ -1,3 +1,9 @@
+2001-11-09 Per Abrahamsen <address@hidden>
+
+ * wid-edit.el (checklist): Removed `:menu-tag'.
+ (radio-button-choice): Ditto.
+ (editable-list): Ditto.
+
2001-11-09 Pavel Janík <address@hidden>
* play/gomoku.el: Move definitions of constants to the beginning
- --__--__--
_______________________________________________
Emacs-diffs mailing list
address@hidden
http://mail.gnu.org/mailman/listinfo/emacs-diffs
End of Emacs-diffs Digest
------- End of forwarded message -------
- [Savannah-hackers] Duplicate diffs,
Richard Stallman <=