diff options
| author | Karoly Lorentey | 2004-08-31 16:30:29 +0000 |
|---|---|---|
| committer | Karoly Lorentey | 2004-08-31 16:30:29 +0000 |
| commit | bfe3b03c6a537ffbdfa25e3b16acd40ae6a833ef (patch) | |
| tree | 961072e4fa30982489b86dd8bc831fe42fedc25e | |
| parent | d61858fb8b38da03f4a53f33e66b11e280533627 (diff) | |
| parent | 2728b5d02c0686c40c49aebd00f7d5520b371aed (diff) | |
| download | emacs-bfe3b03c6a537ffbdfa25e3b16acd40ae6a833ef.tar.gz emacs-bfe3b03c6a537ffbdfa25e3b16acd40ae6a833ef.zip | |
Merged in changes from CVS trunk (Jan Djärv has fixed the XSync call in xterm.c, no need to disable it anymore).
Patches applied:
* miles@gnu.org--gnu-2004/emacs--cvs-trunk--0--patch-506
Update from CVS
* miles@gnu.org--gnu-2004/emacs--cvs-trunk--0--patch-507
Update from CVS
* miles@gnu.org--gnu-2004/emacs--cvs-trunk--0--patch-508
Update from CVS
git-archimport-id: lorentey@elte.hu--2004/emacs--multi-tty--0--patch-238
| -rw-r--r-- | lisp/speedbar.el | 2 | ||||
| -rw-r--r-- | lisp/vc-svn.el | 13 | ||||
| -rw-r--r-- | man/ChangeLog | 14 | ||||
| -rw-r--r-- | man/display.texi | 3 | ||||
| -rw-r--r-- | man/kmacro.texi | 4 | ||||
| -rw-r--r-- | man/search.texi | 11 | ||||
| -rw-r--r-- | src/ChangeLog | 8 | ||||
| -rw-r--r-- | src/xfns.c | 10 | ||||
| -rw-r--r-- | src/xterm.c | 16 |
9 files changed, 58 insertions, 23 deletions
diff --git a/lisp/speedbar.el b/lisp/speedbar.el index 1a222e6004e..db16f2f78f3 100644 --- a/lisp/speedbar.el +++ b/lisp/speedbar.el | |||
| @@ -665,7 +665,7 @@ useful, such as version control." | |||
| 665 | "*Regexp matching files we don't want displayed in a speedbar buffer. | 665 | "*Regexp matching files we don't want displayed in a speedbar buffer. |
| 666 | It is generated from the variable `completion-ignored-extensions'") | 666 | It is generated from the variable `completion-ignored-extensions'") |
| 667 | 667 | ||
| 668 | ;; Ugly compiler silencing trick. The real defvar comes later in this file. | 668 | ;; Compiler silencing trick. The real defvar comes later in this file. |
| 669 | (defvar speedbar-file-regexp) | 669 | (defvar speedbar-file-regexp) |
| 670 | 670 | ||
| 671 | ;; this is dangerous to customize, because the defaults will probably | 671 | ;; this is dangerous to customize, because the defaults will probably |
diff --git a/lisp/vc-svn.el b/lisp/vc-svn.el index 82c09cbd435..fafb5eff7cd 100644 --- a/lisp/vc-svn.el +++ b/lisp/vc-svn.el | |||
| @@ -1,6 +1,7 @@ | |||
| 1 | ;;; vc-svn.el --- non-resident support for Subversion version-control | 1 | ;;; vc-svn.el --- non-resident support for Subversion version-control |
| 2 | 2 | ||
| 3 | ;; Copyright (C) 1995,98,99,2000,2001,02,2003 Free Software Foundation, Inc. | 3 | ;; Copyright (C) 1995, 1998, 1999, 2000, 2001, 2002, 2003, 2004 |
| 4 | ;; Free Software Foundation, Inc. | ||
| 4 | 5 | ||
| 5 | ;; Author: FSF (see vc.el for full credits) | 6 | ;; Author: FSF (see vc.el for full credits) |
| 6 | ;; Maintainer: Stefan Monnier <monnier@gnu.org> | 7 | ;; Maintainer: Stefan Monnier <monnier@gnu.org> |
| @@ -363,7 +364,10 @@ The changes are between FIRST-VERSION and SECOND-VERSION." | |||
| 363 | (append (vc-switches nil 'diff) '("/dev/null"))) | 364 | (append (vc-switches nil 'diff) '("/dev/null"))) |
| 364 | ;; Even if it's empty, it's locally modified. | 365 | ;; Even if it's empty, it's locally modified. |
| 365 | 1) | 366 | 1) |
| 366 | (let* ((switches (vc-switches 'SVN 'diff)) | 367 | (let* ((switches |
| 368 | (if vc-svn-diff-switches | ||
| 369 | (vc-switches 'SVN 'diff) | ||
| 370 | (list "-x" (mapconcat 'identity (vc-switches nil 'diff) " ")))) | ||
| 367 | (async (and (vc-stay-local-p file) | 371 | (async (and (vc-stay-local-p file) |
| 368 | (or oldvers newvers) ; Svn diffs those locally. | 372 | (or oldvers newvers) ; Svn diffs those locally. |
| 369 | (fboundp 'start-process)))) | 373 | (fboundp 'start-process)))) |
| @@ -371,8 +375,7 @@ The changes are between FIRST-VERSION and SECOND-VERSION." | |||
| 371 | (if async 'async 0) | 375 | (if async 'async 0) |
| 372 | file "diff" | 376 | file "diff" |
| 373 | (append | 377 | (append |
| 374 | (when switches | 378 | switches |
| 375 | (list "-x" (mapconcat 'identity switches " "))) | ||
| 376 | (when oldvers | 379 | (when oldvers |
| 377 | (list "-r" (if newvers (concat oldvers ":" newvers) | 380 | (list "-r" (if newvers (concat oldvers ":" newvers) |
| 378 | oldvers))))) | 381 | oldvers))))) |
| @@ -504,5 +507,5 @@ essential information." | |||
| 504 | 507 | ||
| 505 | (provide 'vc-svn) | 508 | (provide 'vc-svn) |
| 506 | 509 | ||
| 507 | ;;; arch-tag: 02f10c68-2b4d-453a-90fc-1eee6cfb268d | 510 | ;; arch-tag: 02f10c68-2b4d-453a-90fc-1eee6cfb268d |
| 508 | ;;; vc-svn.el ends here | 511 | ;;; vc-svn.el ends here |
diff --git a/man/ChangeLog b/man/ChangeLog index 5c0926de48a..72024ae917a 100644 --- a/man/ChangeLog +++ b/man/ChangeLog | |||
| @@ -1,3 +1,17 @@ | |||
| 1 | 2004-08-23 Luc Teirlinck <teirllm@auburn.edu> | ||
| 2 | |||
| 3 | * display.texi (Font Lock): Correct invalid @xref. | ||
| 4 | |||
| 5 | * search.texi (Regexps): Correct cryptic @ref. | ||
| 6 | (Configuring Scrolling): Correct invalid @xref. | ||
| 7 | (Regexp Replace): Standardize reference to hardcopy Elisp Manual | ||
| 8 | in @pxref. | ||
| 9 | |||
| 10 | 2004-08-22 Luc Teirlinck <teirllm@auburn.edu> | ||
| 11 | |||
| 12 | * kmacro.texi (Keyboard Macro Counter, Keyboard Macro Step-Edit): | ||
| 13 | Change section names. | ||
| 14 | |||
| 1 | 2004-08-22 David Kastrup <dak@gnu.org> | 15 | 2004-08-22 David Kastrup <dak@gnu.org> |
| 2 | 16 | ||
| 3 | * reftex.texi (AUCTeX): Update links, section name. | 17 | * reftex.texi (AUCTeX): Update links, section name. |
diff --git a/man/display.texi b/man/display.texi index 2c530ec480a..b78eb8ab939 100644 --- a/man/display.texi +++ b/man/display.texi | |||
| @@ -316,7 +316,8 @@ comments, use this: | |||
| 316 | @findex font-lock-remove-keywords | 316 | @findex font-lock-remove-keywords |
| 317 | To remove keywords from the font-lock highlighting patterns, use the | 317 | To remove keywords from the font-lock highlighting patterns, use the |
| 318 | function @code{font-lock-remove-keywords}. @xref{Search-based | 318 | function @code{font-lock-remove-keywords}. @xref{Search-based |
| 319 | Fontification,,,elisp}, for documentation of the format of this list. | 319 | Fontification,,, elisp, The Emacs Lisp Reference Manual}, for |
| 320 | documentation of the format of this list. | ||
| 320 | 321 | ||
| 321 | @cindex just-in-time (JIT) font-lock | 322 | @cindex just-in-time (JIT) font-lock |
| 322 | @cindex background syntax highlighting | 323 | @cindex background syntax highlighting |
diff --git a/man/kmacro.texi b/man/kmacro.texi index a0b3a249bbd..d3c24873cd0 100644 --- a/man/kmacro.texi +++ b/man/kmacro.texi | |||
| @@ -261,7 +261,7 @@ the macro ring. | |||
| 261 | executes the previous (rather than the head) element on the macro ring. | 261 | executes the previous (rather than the head) element on the macro ring. |
| 262 | 262 | ||
| 263 | @node Keyboard Macro Counter | 263 | @node Keyboard Macro Counter |
| 264 | @section Inserting incrementing numbers in macros | 264 | @section The Keyboard Macro Counter |
| 265 | 265 | ||
| 266 | Each keyboard macro has an associated counter which is automatically | 266 | Each keyboard macro has an associated counter which is automatically |
| 267 | incremented on every repetition of the keyboard macro. Normally, the | 267 | incremented on every repetition of the keyboard macro. Normally, the |
| @@ -449,7 +449,7 @@ keyboard input that you would use to invoke the macro---@kbd{C-x e} or | |||
| 449 | @kbd{C-x C-k l} (@code{kmacro-edit-lossage}). | 449 | @kbd{C-x C-k l} (@code{kmacro-edit-lossage}). |
| 450 | 450 | ||
| 451 | @node Keyboard Macro Step-Edit | 451 | @node Keyboard Macro Step-Edit |
| 452 | @section Interactively executing and editing a keyboard macro | 452 | @section Stepwise Editing a Keyboard Macro |
| 453 | 453 | ||
| 454 | @findex kmacro-step-edit-macro | 454 | @findex kmacro-step-edit-macro |
| 455 | @kindex C-x C-k SPC | 455 | @kindex C-x C-k SPC |
diff --git a/man/search.texi b/man/search.texi index c31bc60af62..a0c64275de0 100644 --- a/man/search.texi +++ b/man/search.texi | |||
| @@ -434,7 +434,7 @@ Search}. | |||
| 434 | This manual describes regular expression features that users | 434 | This manual describes regular expression features that users |
| 435 | typically want to use. There are additional features that are | 435 | typically want to use. There are additional features that are |
| 436 | mainly used in Lisp programs; see @ref{Regular Expressions,,, | 436 | mainly used in Lisp programs; see @ref{Regular Expressions,,, |
| 437 | elisp, the same manual}. | 437 | elisp, The Emacs Lisp Reference Manual}. |
| 438 | 438 | ||
| 439 | Regular expressions have a syntax in which a few characters are | 439 | Regular expressions have a syntax in which a few characters are |
| 440 | special constructs and the rest are @dfn{ordinary}. An ordinary | 440 | special constructs and the rest are @dfn{ordinary}. An ordinary |
| @@ -921,7 +921,8 @@ The buffer contents. | |||
| 921 | @item | 921 | @item |
| 922 | The selected window and selected frame. | 922 | The selected window and selected frame. |
| 923 | @item | 923 | @item |
| 924 | The current match-data @xref{Match Data,,,elisp}. | 924 | The current match-data. @xref{Match Data,,, elisp, The Emacs Lisp |
| 925 | Reference Manual}. | ||
| 925 | @end enumerate | 926 | @end enumerate |
| 926 | 927 | ||
| 927 | Additionally, the command must not delete the current window and must | 928 | Additionally, the command must not delete the current window and must |
| @@ -930,7 +931,7 @@ window's size, or create or delete other windows and frames. | |||
| 930 | 931 | ||
| 931 | Note that an attempt by a command to scroll the text | 932 | Note that an attempt by a command to scroll the text |
| 932 | @emph{horizontally} won't work, although it will do no harm---any such | 933 | @emph{horizontally} won't work, although it will do no harm---any such |
| 933 | scrolling will be overriden and nullified by the display code. | 934 | scrolling will be overridden and nullified by the display code. |
| 934 | 935 | ||
| 935 | @node Replace, Other Repeating Search, Configuring Scrolling, Search | 936 | @node Replace, Other Repeating Search, Configuring Scrolling, Search |
| 936 | @section Replacement Commands | 937 | @section Replacement Commands |
| @@ -1063,7 +1064,7 @@ M-x replace-regexp @key{RET} \(x\)\|y @key{RET} | |||
| 1063 | @end example | 1064 | @end example |
| 1064 | 1065 | ||
| 1065 | For computing replacement strings for @samp{\,}, the @code{format} | 1066 | For computing replacement strings for @samp{\,}, the @code{format} |
| 1066 | function is often useful (@pxref{Formatting Strings,,,elisp, GNU Emacs | 1067 | function is often useful (@pxref{Formatting Strings,,, elisp, The Emacs |
| 1067 | Lisp Reference Manual}). For example, to add consecutively numbered | 1068 | Lisp Reference Manual}). For example, to add consecutively numbered |
| 1068 | strings like @samp{ABC00042} to columns 73 @w{to 80} (unless they are | 1069 | strings like @samp{ABC00042} to columns 73 @w{to 80} (unless they are |
| 1069 | already occupied), you can use | 1070 | already occupied), you can use |
| @@ -1084,7 +1085,7 @@ M-x replace-regexp @key{RET} \footnote@{ @key{RET} | |||
| 1084 | @end example | 1085 | @end example |
| 1085 | 1086 | ||
| 1086 | @noindent | 1087 | @noindent |
| 1087 | will add labels starting with @samp{\label@{fn:0@}} to occurences of | 1088 | will add labels starting with @samp{\label@{fn:0@}} to occurrences of |
| 1088 | @samp{\footnote@{}, but letting you edit each replacement before | 1089 | @samp{\footnote@{}, but letting you edit each replacement before |
| 1089 | performing it. To number the labels starting at 1, use @samp{\,(1+ | 1090 | performing it. To number the labels starting at 1, use @samp{\,(1+ |
| 1090 | \#)} instead of @samp{\#}. | 1091 | \#)} instead of @samp{\#}. |
diff --git a/src/ChangeLog b/src/ChangeLog index cbf06bc480f..d49514b2fc0 100644 --- a/src/ChangeLog +++ b/src/ChangeLog | |||
| @@ -1,3 +1,11 @@ | |||
| 1 | 2004-08-24 Jan Dj,Ad(Brv <jan.h.d@swipnet.se> | ||
| 2 | |||
| 3 | * xterm.c (x_catch_errors_unwind): Do not XSync if display has closed. | ||
| 4 | |||
| 5 | * xfns.c (x_window_to_frame, x_any_window_to_frame) | ||
| 6 | (x_non_menubar_window_to_frame, x_menubar_window_to_frame) | ||
| 7 | (x_top_window_to_frame): Return 0 if wdesc is None. | ||
| 8 | |||
| 1 | 2004-08-22 Richard M. Stallman <rms@gnu.org> | 9 | 2004-08-22 Richard M. Stallman <rms@gnu.org> |
| 2 | 10 | ||
| 3 | * process.c (process_send_signal) [SIGNALS_VIA_CHARACTERS, | 11 | * process.c (process_send_signal) [SIGNALS_VIA_CHARACTERS, |
diff --git a/src/xfns.c b/src/xfns.c index 762b45d0089..e03edbbec89 100644 --- a/src/xfns.c +++ b/src/xfns.c | |||
| @@ -293,6 +293,8 @@ x_window_to_frame (dpyinfo, wdesc) | |||
| 293 | Lisp_Object tail, frame; | 293 | Lisp_Object tail, frame; |
| 294 | struct frame *f; | 294 | struct frame *f; |
| 295 | 295 | ||
| 296 | if (wdesc == None) return 0; | ||
| 297 | |||
| 296 | for (tail = Vframe_list; GC_CONSP (tail); tail = XCDR (tail)) | 298 | for (tail = Vframe_list; GC_CONSP (tail); tail = XCDR (tail)) |
| 297 | { | 299 | { |
| 298 | frame = XCAR (tail); | 300 | frame = XCAR (tail); |
| @@ -342,6 +344,8 @@ x_any_window_to_frame (dpyinfo, wdesc) | |||
| 342 | struct frame *f, *found; | 344 | struct frame *f, *found; |
| 343 | struct x_output *x; | 345 | struct x_output *x; |
| 344 | 346 | ||
| 347 | if (wdesc == None) return NULL; | ||
| 348 | |||
| 345 | found = NULL; | 349 | found = NULL; |
| 346 | for (tail = Vframe_list; GC_CONSP (tail) && !found; tail = XCDR (tail)) | 350 | for (tail = Vframe_list; GC_CONSP (tail) && !found; tail = XCDR (tail)) |
| 347 | { | 351 | { |
| @@ -396,6 +400,8 @@ x_non_menubar_window_to_frame (dpyinfo, wdesc) | |||
| 396 | struct frame *f; | 400 | struct frame *f; |
| 397 | struct x_output *x; | 401 | struct x_output *x; |
| 398 | 402 | ||
| 403 | if (wdesc == None) return 0; | ||
| 404 | |||
| 399 | for (tail = Vframe_list; GC_CONSP (tail); tail = XCDR (tail)) | 405 | for (tail = Vframe_list; GC_CONSP (tail); tail = XCDR (tail)) |
| 400 | { | 406 | { |
| 401 | frame = XCAR (tail); | 407 | frame = XCAR (tail); |
| @@ -442,6 +448,8 @@ x_menubar_window_to_frame (dpyinfo, wdesc) | |||
| 442 | struct frame *f; | 448 | struct frame *f; |
| 443 | struct x_output *x; | 449 | struct x_output *x; |
| 444 | 450 | ||
| 451 | if (wdesc == None) return 0; | ||
| 452 | |||
| 445 | for (tail = Vframe_list; GC_CONSP (tail); tail = XCDR (tail)) | 453 | for (tail = Vframe_list; GC_CONSP (tail); tail = XCDR (tail)) |
| 446 | { | 454 | { |
| 447 | frame = XCAR (tail); | 455 | frame = XCAR (tail); |
| @@ -487,6 +495,8 @@ x_top_window_to_frame (dpyinfo, wdesc) | |||
| 487 | struct frame *f; | 495 | struct frame *f; |
| 488 | struct x_output *x; | 496 | struct x_output *x; |
| 489 | 497 | ||
| 498 | if (wdesc == None) return 0; | ||
| 499 | |||
| 490 | for (tail = Vframe_list; GC_CONSP (tail); tail = XCDR (tail)) | 500 | for (tail = Vframe_list; GC_CONSP (tail); tail = XCDR (tail)) |
| 491 | { | 501 | { |
| 492 | frame = XCAR (tail); | 502 | frame = XCAR (tail); |
diff --git a/src/xterm.c b/src/xterm.c index eb455522d1c..c1edf49aca7 100644 --- a/src/xterm.c +++ b/src/xterm.c | |||
| @@ -7608,15 +7608,13 @@ static Lisp_Object | |||
| 7608 | x_catch_errors_unwind (old_val) | 7608 | x_catch_errors_unwind (old_val) |
| 7609 | Lisp_Object old_val; | 7609 | Lisp_Object old_val; |
| 7610 | { | 7610 | { |
| 7611 | Lisp_Object first; | 7611 | Lisp_Object first = XCAR (old_val); |
| 7612 | 7612 | Display *dpy = XSAVE_VALUE (first)->pointer; | |
| 7613 | first = XCAR (old_val); | 7613 | |
| 7614 | 7614 | /* The display may have been closed before this function is called. | |
| 7615 | #if 0 /* XXX This has dumped core on me several times when my X | 7615 | Check if it is still open before calling XSync. */ |
| 7616 | server crashed. If this call is important, maybe we should | 7616 | if (x_display_info_for_display (dpy) != 0) |
| 7617 | check that the display is still alive. -- lorentey */ | 7617 | XSync (dpy, False); |
| 7618 | XSync (XSAVE_VALUE (first)->pointer, False); | ||
| 7619 | #endif | ||
| 7620 | 7618 | ||
| 7621 | x_error_message_string = XCDR (old_val); | 7619 | x_error_message_string = XCDR (old_val); |
| 7622 | return Qnil; | 7620 | return Qnil; |