aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorGlenn Morris2014-11-03 16:49:37 -0500
committerGlenn Morris2014-11-03 16:49:37 -0500
commit41e962982dfe424c69ed99f0bd26a6e4eb67107f (patch)
treed7cda64bfecc7b9403459fda89b7f39a9fd8732f
parent303fd9411f21d19604306ecdbd89941bf4923201 (diff)
parentbd673cc594764572cd49bd0f10a0432006368489 (diff)
downloademacs-41e962982dfe424c69ed99f0bd26a6e4eb67107f.tar.gz
emacs-41e962982dfe424c69ed99f0bd26a6e4eb67107f.zip
Merge from emacs-24; up to 2014-08-07T11:49:36Z!rrt@sc3d.org
-rw-r--r--doc/emacs/ChangeLog4
-rw-r--r--doc/emacs/programs.texi2
-rw-r--r--etc/NEWS.245
-rw-r--r--lisp/ChangeLog9
-rw-r--r--lisp/net/tramp-adb.el17
-rw-r--r--lisp/net/tramp-sh.el10
-rw-r--r--lisp/obsolete/crisp.el2
-rw-r--r--src/ChangeLog10
-rw-r--r--src/nsfns.m8
-rw-r--r--src/window.c4
-rw-r--r--src/xdisp.c14
11 files changed, 66 insertions, 19 deletions
diff --git a/doc/emacs/ChangeLog b/doc/emacs/ChangeLog
index adf61e833b3..9dc3af97788 100644
--- a/doc/emacs/ChangeLog
+++ b/doc/emacs/ChangeLog
@@ -1,3 +1,7 @@
12014-11-03 Glenn Morris <rgm@gnu.org>
2
3 * programs.texi (Misc for Programs): Fix typo.
4
12014-10-30 Eli Zaretskii <eliz@gnu.org> 52014-10-30 Eli Zaretskii <eliz@gnu.org>
2 6
3 * frames.texi (Scroll Bars): Improve indexing of faces. 7 * frames.texi (Scroll Bars): Improve indexing of faces.
diff --git a/doc/emacs/programs.texi b/doc/emacs/programs.texi
index 4c80449c2a2..f2ca386b49e 100644
--- a/doc/emacs/programs.texi
+++ b/doc/emacs/programs.texi
@@ -1453,7 +1453,7 @@ creates.
1453@findex superword-mode 1453@findex superword-mode
1454 Superword mode is a buffer-local minor mode that causes editing and 1454 Superword mode is a buffer-local minor mode that causes editing and
1455motion commands to treat symbols (e.g., @samp{this_is_a_symbol}) as words. 1455motion commands to treat symbols (e.g., @samp{this_is_a_symbol}) as words.
1456When Subword mode is enabled, the minor mode indicator 1456When Superword mode is enabled, the minor mode indicator
1457@iftex 1457@iftex
1458@samp{@math{^2}} 1458@samp{@math{^2}}
1459@end iftex 1459@end iftex
diff --git a/etc/NEWS.24 b/etc/NEWS.24
index 8c039a55a2f..3d580ee36c4 100644
--- a/etc/NEWS.24
+++ b/etc/NEWS.24
@@ -38,7 +38,10 @@ don't take "&rest args" any more.
38*** cc-compat.el 38*** cc-compat.el
39 39
40--- 40---
41*** crisp.el, tpu-edt.el, ws-mode.el 41*** crisp.el - moved to elpa.gnu.org.
42
43---
44*** tpu-edt.el, ws-mode.el
42These emulations of old editors are believed to be no longer relevant 45These emulations of old editors are believed to be no longer relevant
43 - contact emacs-devel@gnu.org if you disagree. 46 - contact emacs-devel@gnu.org if you disagree.
44 47
diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index a94725c0b56..05c8ce4d83a 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,12 @@
12014-11-03 Michael Albinus <michael.albinus@gmx.de>
2
3 * net/tramp-sh.el (tramp-do-copy-or-rename-file-via-buffer): Use a
4 local copy of FILENAME, when it is remote. (Bug#18751)
5
6 * net/tramp-adb.el (tramp-adb-handle-process-file): Do not raise
7 an error when the command fails; the return code must indicate.
8 (tramp-adb-send-command-and-check): Fix docstring.
9
12014-11-03 Lars Magne Ingebrigtsen <larsi@gnus.org> 102014-11-03 Lars Magne Ingebrigtsen <larsi@gnus.org>
2 11
3 * net/eww.el (eww-display-html): Clear `url-queue'. 12 * net/eww.el (eww-display-html): Clear `url-queue'.
diff --git a/lisp/net/tramp-adb.el b/lisp/net/tramp-adb.el
index 88e52fe0199..639f07b2f1d 100644
--- a/lisp/net/tramp-adb.el
+++ b/lisp/net/tramp-adb.el
@@ -794,11 +794,13 @@ PRESERVE-UID-GID and PRESERVE-EXTENDED-ATTRIBUTES are completely ignored."
794 ;; directory. 794 ;; directory.
795 (condition-case nil 795 (condition-case nil
796 (progn 796 (progn
797 (setq ret 0) 797 (setq ret
798 (tramp-adb-barf-unless-okay 798 (if (tramp-adb-send-command-and-check
799 v (format "(cd %s; %s)" 799 v
800 (tramp-shell-quote-argument localname) command) 800 (format "(cd %s; %s)"
801 "") 801 (tramp-shell-quote-argument localname) command))
802 ;; Set return status accordingly.
803 0 1))
802 ;; We should add the output anyway. 804 ;; We should add the output anyway.
803 (when outbuf 805 (when outbuf
804 (with-current-buffer outbuf 806 (with-current-buffer outbuf
@@ -1031,8 +1033,9 @@ This happens for Android >= 4.0."
1031(defun tramp-adb-send-command-and-check 1033(defun tramp-adb-send-command-and-check
1032 (vec command) 1034 (vec command)
1033 "Run COMMAND and check its exit status. 1035 "Run COMMAND and check its exit status.
1034Sends `echo $?' along with the COMMAND for checking the exit status. If 1036Sends `echo $?' along with the COMMAND for checking the exit
1035COMMAND is nil, just sends `echo $?'. Returns the exit status found." 1037status. If COMMAND is nil, just sends `echo $?'. Returns nil if
1038the exit status is not equal 0, and t otherwise."
1036 (tramp-adb-send-command 1039 (tramp-adb-send-command
1037 vec (if command 1040 vec (if command
1038 (format "%s; echo tramp_exit_status $?" command) 1041 (format "%s; echo tramp_exit_status $?" command)
diff --git a/lisp/net/tramp-sh.el b/lisp/net/tramp-sh.el
index e120aedfc01..a72a79a7797 100644
--- a/lisp/net/tramp-sh.el
+++ b/lisp/net/tramp-sh.el
@@ -2061,11 +2061,15 @@ FILENAME is the source file, NEWNAME the target file.
2061KEEP-DATE is non-nil if NEWNAME should have the same timestamp as FILENAME." 2061KEEP-DATE is non-nil if NEWNAME should have the same timestamp as FILENAME."
2062 (with-temp-buffer 2062 (with-temp-buffer
2063 ;; We must disable multibyte, because binary data shall not be 2063 ;; We must disable multibyte, because binary data shall not be
2064 ;; converted. 2064 ;; converted. `insert-file-contents-literally' does not support
2065 ;; file name handlers for GNU Emacs; we must create a local copy
2066 ;; therefore.
2065 (set-buffer-multibyte nil) 2067 (set-buffer-multibyte nil)
2066 (let ((coding-system-for-read 'binary) 2068 (let ((coding-system-for-read 'binary)
2067 (jka-compr-inhibit t)) 2069 (jka-compr-inhibit t)
2068 (insert-file-contents-literally filename)) 2070 (tmpfile (file-local-copy filename)))
2071 (insert-file-contents-literally (or tmpfile filename))
2072 (when tmpfile (delete-file tmpfile)))
2069 ;; We don't want the target file to be compressed, so we let-bind 2073 ;; We don't want the target file to be compressed, so we let-bind
2070 ;; `jka-compr-inhibit' to t. 2074 ;; `jka-compr-inhibit' to t.
2071 (let ((coding-system-for-write 'binary) 2075 (let ((coding-system-for-write 'binary)
diff --git a/lisp/obsolete/crisp.el b/lisp/obsolete/crisp.el
index 47cf898190b..b9c2fc63a52 100644
--- a/lisp/obsolete/crisp.el
+++ b/lisp/obsolete/crisp.el
@@ -23,6 +23,8 @@
23 23
24;;; Commentary: 24;;; Commentary:
25 25
26;; *Note: This package has now moved to elpa.gnu.org.*
27
26;; Keybindings and minor functions to duplicate the functionality and 28;; Keybindings and minor functions to duplicate the functionality and
27;; finger-feel of the CRiSP/Brief editor. This package is designed to 29;; finger-feel of the CRiSP/Brief editor. This package is designed to
28;; facilitate transitioning from Brief to (XE|E)macs with a minimum 30;; facilitate transitioning from Brief to (XE|E)macs with a minimum
diff --git a/src/ChangeLog b/src/ChangeLog
index 2f719681afb..6b62a60f7b0 100644
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -1,3 +1,13 @@
12014-11-03 Eli Zaretskii <eliz@gnu.org>
2
3 * xdisp.c (Fdump_glyph_matrix, Fdump_frame_glyph_matrix): Doc fix.
4 (Fdump_frame_glyph_matrix): Don't segfault if invoked on a GUI
5 frame; instead, print an error message.
6
72014-11-03 Jan Djärv <jan.h.d@swipnet.se>
8
9 * nsfns.m (ns_set_doc_edited): Check for FRAME_NS (Bug#18925).
10
12014-11-02 Jan Djärv <jan.h.d@swipnet.se> 112014-11-02 Jan Djärv <jan.h.d@swipnet.se>
2 12
3 * nsimage.m (allocInitFromFile:): Initialize bmRep. 13 * nsimage.m (allocInitFromFile:): Initialize bmRep.
diff --git a/src/nsfns.m b/src/nsfns.m
index ce859e8333d..1537adbc56d 100644
--- a/src/nsfns.m
+++ b/src/nsfns.m
@@ -639,8 +639,12 @@ ns_set_doc_edited (void)
639 { 639 {
640 BOOL edited = NO; 640 BOOL edited = NO;
641 struct frame *f = XFRAME (frame); 641 struct frame *f = XFRAME (frame);
642 struct window *w = XWINDOW (FRAME_SELECTED_WINDOW (f)); 642 struct window *w;
643 NSView *view = FRAME_NS_VIEW (f); 643 NSView *view;
644
645 if (! FRAME_NS_P (f)) continue;
646 w = XWINDOW (FRAME_SELECTED_WINDOW (f));
647 view = FRAME_NS_VIEW (f);
644 if (!MINI_WINDOW_P (w)) 648 if (!MINI_WINDOW_P (w))
645 edited = ! NILP (Fbuffer_modified_p (w->contents)) && 649 edited = ! NILP (Fbuffer_modified_p (w->contents)) &&
646 ! NILP (Fbuffer_file_name (w->contents)); 650 ! NILP (Fbuffer_file_name (w->contents));
diff --git a/src/window.c b/src/window.c
index 0b0f2140a58..2c9292d5b02 100644
--- a/src/window.c
+++ b/src/window.c
@@ -4930,8 +4930,8 @@ window_scroll_pixel_based (Lisp_Object window, int n, bool whole, int noerror)
4930 /* The function move_iterator_vertically may move over more than 4930 /* The function move_iterator_vertically may move over more than
4931 the specified y-distance. If it->w is small, e.g. a 4931 the specified y-distance. If it->w is small, e.g. a
4932 mini-buffer window, we may end up in front of the window's 4932 mini-buffer window, we may end up in front of the window's
4933 display area. This is the case when Start displaying at the 4933 display area. Start displaying at the start of the line
4934 start of the line containing PT in this case. */ 4934 containing PT in this case. */
4935 if (it.current_y <= 0) 4935 if (it.current_y <= 0)
4936 { 4936 {
4937 init_iterator (&it, w, PT, PT_BYTE, NULL, DEFAULT_FACE_ID); 4937 init_iterator (&it, w, PT, PT_BYTE, NULL, DEFAULT_FACE_ID);
diff --git a/src/xdisp.c b/src/xdisp.c
index 228b6cb586d..2cdbade3062 100644
--- a/src/xdisp.c
+++ b/src/xdisp.c
@@ -18803,7 +18803,10 @@ DEFUN ("dump-glyph-matrix", Fdump_glyph_matrix,
18803 doc: /* Dump the current matrix of the selected window to stderr. 18803 doc: /* Dump the current matrix of the selected window to stderr.
18804Shows contents of glyph row structures. With non-nil 18804Shows contents of glyph row structures. With non-nil
18805parameter GLYPHS, dump glyphs as well. If GLYPHS is 1 show 18805parameter GLYPHS, dump glyphs as well. If GLYPHS is 1 show
18806glyphs in short form, otherwise show glyphs in long form. */) 18806glyphs in short form, otherwise show glyphs in long form.
18807
18808Interactively, no argument means show glyphs in short form;
18809with numeric argument, its value is passed as the GLYPHS flag. */)
18807 (Lisp_Object glyphs) 18810 (Lisp_Object glyphs)
18808{ 18811{
18809 struct window *w = XWINDOW (selected_window); 18812 struct window *w = XWINDOW (selected_window);
@@ -18821,11 +18824,16 @@ glyphs in short form, otherwise show glyphs in long form. */)
18821 18824
18822 18825
18823DEFUN ("dump-frame-glyph-matrix", Fdump_frame_glyph_matrix, 18826DEFUN ("dump-frame-glyph-matrix", Fdump_frame_glyph_matrix,
18824 Sdump_frame_glyph_matrix, 0, 0, "", doc: /* */) 18827 Sdump_frame_glyph_matrix, 0, 0, "", doc: /* Dump the current glyph matrix of the selected frame to stderr.
18828Only text-mode frames have frame glyph matrices. */)
18825 (void) 18829 (void)
18826{ 18830{
18827 struct frame *f = XFRAME (selected_frame); 18831 struct frame *f = XFRAME (selected_frame);
18828 dump_glyph_matrix (f->current_matrix, 1); 18832
18833 if (f->current_matrix)
18834 dump_glyph_matrix (f->current_matrix, 1);
18835 else
18836 fprintf (stderr, "*** This frame doesn't have a frame glyph matrix ***\n");
18829 return Qnil; 18837 return Qnil;
18830} 18838}
18831 18839