diff options
| -rw-r--r-- | admin/ChangeLog | 5 | ||||
| -rw-r--r-- | admin/unidata/Makefile.in | 2 | ||||
| -rw-r--r-- | lisp/ChangeLog | 4 | ||||
| -rw-r--r-- | lisp/erc/ChangeLog | 5 | ||||
| -rw-r--r-- | lisp/erc/erc-backend.el | 4 | ||||
| -rw-r--r-- | lisp/erc/erc-button.el | 2 | ||||
| -rw-r--r-- | lisp/erc/erc-join.el | 4 | ||||
| -rw-r--r-- | lisp/erc/erc-match.el | 2 | ||||
| -rw-r--r-- | lisp/erc/erc-stamp.el | 2 | ||||
| -rw-r--r-- | lisp/erc/erc.el | 4 | ||||
| -rw-r--r-- | lisp/startup.el | 1 | ||||
| -rw-r--r-- | src/ChangeLog | 14 | ||||
| -rw-r--r-- | src/fileio.c | 7 | ||||
| -rw-r--r-- | src/nsterm.h | 2 | ||||
| -rw-r--r-- | src/nsterm.m | 18 |
15 files changed, 54 insertions, 22 deletions
diff --git a/admin/ChangeLog b/admin/ChangeLog index 17de5a49902..1c439504892 100644 --- a/admin/ChangeLog +++ b/admin/ChangeLog | |||
| @@ -1,3 +1,8 @@ | |||
| 1 | 2014-11-10 Eli Zaretskii <eliz@gnu.org> | ||
| 2 | |||
| 3 | * unidata/Makefile.in (${top_srcdir}/src/macuvs.h): Use | ||
| 4 | unmsys--file-name. (Bug#18955) | ||
| 5 | |||
| 1 | 2014-11-10 Glenn Morris <rgm@gnu.org> | 6 | 2014-11-10 Glenn Morris <rgm@gnu.org> |
| 2 | 7 | ||
| 3 | * admin.el (set-version): No need to update doc/man/emacs.1. | 8 | * admin.el (set-version): No need to update doc/man/emacs.1. |
diff --git a/admin/unidata/Makefile.in b/admin/unidata/Makefile.in index 05d3f929f18..94504818d12 100644 --- a/admin/unidata/Makefile.in +++ b/admin/unidata/Makefile.in | |||
| @@ -41,7 +41,7 @@ all: ${top_srcdir}/src/macuvs.h unifiles | |||
| 41 | ${top_srcdir}/src/macuvs.h: ${srcdir}/uvs.el ${srcdir}/IVD_Sequences.txt | \ | 41 | ${top_srcdir}/src/macuvs.h: ${srcdir}/uvs.el ${srcdir}/IVD_Sequences.txt | \ |
| 42 | ${srcdir}/uvs.elc | 42 | ${srcdir}/uvs.elc |
| 43 | ${emacs} -L ${srcdir} -l uvs \ | 43 | ${emacs} -L ${srcdir} -l uvs \ |
| 44 | --eval '(uvs-print-table-ivd "${srcdir}/IVD_Sequences.txt" "Adobe-Japan1")' \ | 44 | --eval '(uvs-print-table-ivd (unmsys--file-name "${srcdir}/IVD_Sequences.txt") "Adobe-Japan1")' \ |
| 45 | > $@ | 45 | > $@ |
| 46 | 46 | ||
| 47 | %.elc: %.el | 47 | %.elc: %.el |
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 94473f03b7f..c170c50c9f8 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog | |||
| @@ -1,3 +1,7 @@ | |||
| 1 | 2014-11-10 Glenn Morris <rgm@gnu.org> | ||
| 2 | |||
| 3 | * startup.el (command-line): Handle nil elements in load-path. | ||
| 4 | |||
| 1 | 2014-11-10 Stefan Monnier <monnier@iro.umontreal.ca> | 5 | 2014-11-10 Stefan Monnier <monnier@iro.umontreal.ca> |
| 2 | 6 | ||
| 3 | * help.el (view-lossage): Include the actual commands run. | 7 | * help.el (view-lossage): Include the actual commands run. |
diff --git a/lisp/erc/ChangeLog b/lisp/erc/ChangeLog index 0875994e775..475b99edb93 100644 --- a/lisp/erc/ChangeLog +++ b/lisp/erc/ChangeLog | |||
| @@ -1,3 +1,8 @@ | |||
| 1 | 2014-11-10 Kelvin White <kwhite@gnu.org> | ||
| 2 | |||
| 3 | * erc-match.el, erc-join.el, erc-stamp.el, erc-backend.el, erc.el: | ||
| 4 | * erc-button.el: Update version to 24.5. | ||
| 5 | |||
| 1 | 2014-11-05 Stefan Monnier <monnier@iro.umontreal.ca> | 6 | 2014-11-05 Stefan Monnier <monnier@iro.umontreal.ca> |
| 2 | 7 | ||
| 3 | * erc.el (erc-send-input): Bind `str' dynamically (bug#18936). | 8 | * erc.el (erc-send-input): Bind `str' dynamically (bug#18936). |
diff --git a/lisp/erc/erc-backend.el b/lisp/erc/erc-backend.el index fb22f58822d..2c6b03720f0 100644 --- a/lisp/erc/erc-backend.el +++ b/lisp/erc/erc-backend.el | |||
| @@ -333,7 +333,7 @@ Good luck." | |||
| 333 | This will only be consulted if the coding system in | 333 | This will only be consulted if the coding system in |
| 334 | `erc-server-coding-system' is `undecided'." | 334 | `erc-server-coding-system' is `undecided'." |
| 335 | :group 'erc-server | 335 | :group 'erc-server |
| 336 | :version "24.1" | 336 | :version "24.5" |
| 337 | :type '(repeat coding-system)) | 337 | :type '(repeat coding-system)) |
| 338 | 338 | ||
| 339 | (defcustom erc-server-coding-system (if (and (fboundp 'coding-system-p) | 339 | (defcustom erc-server-coding-system (if (and (fboundp 'coding-system-p) |
| @@ -400,7 +400,7 @@ isn't displayed." | |||
| 400 | (defcustom erc-server-timestamp-format "%Y-%m-%d %T" | 400 | (defcustom erc-server-timestamp-format "%Y-%m-%d %T" |
| 401 | "Timestamp format used with server response messages. | 401 | "Timestamp format used with server response messages. |
| 402 | This string is processed using `format-time-string'." | 402 | This string is processed using `format-time-string'." |
| 403 | :version "24.3" | 403 | :version "24.5" |
| 404 | :type 'string | 404 | :type 'string |
| 405 | :group 'erc-server) | 405 | :group 'erc-server) |
| 406 | 406 | ||
diff --git a/lisp/erc/erc-button.el b/lisp/erc/erc-button.el index 6e2c60cf6fa..b83fd9eeeb9 100644 --- a/lisp/erc/erc-button.el +++ b/lisp/erc/erc-button.el | |||
| @@ -183,7 +183,7 @@ PAR is a number of a regexp grouping whose text will be passed to | |||
| 183 | 'nicknames, these are ignored, and CALLBACK will be called with | 183 | 'nicknames, these are ignored, and CALLBACK will be called with |
| 184 | the nickname matched as the argument." | 184 | the nickname matched as the argument." |
| 185 | :group 'erc-button | 185 | :group 'erc-button |
| 186 | :version "24.3" ; remove finger (bug#4443) | 186 | :version "24.5" ; remove finger (bug#4443) |
| 187 | :type '(repeat | 187 | :type '(repeat |
| 188 | (list :tag "Button" | 188 | (list :tag "Button" |
| 189 | (choice :tag "Matches" | 189 | (choice :tag "Matches" |
diff --git a/lisp/erc/erc-join.el b/lisp/erc/erc-join.el index e47e6e0c89e..0a24cb864da 100644 --- a/lisp/erc/erc-join.el +++ b/lisp/erc/erc-join.el | |||
| @@ -83,7 +83,7 @@ If the value is `ident', autojoin after successful NickServ | |||
| 83 | identification, or after `erc-autojoin-delay' seconds. | 83 | identification, or after `erc-autojoin-delay' seconds. |
| 84 | Any other value means the same as `connect'." | 84 | Any other value means the same as `connect'." |
| 85 | :group 'erc-autojoin | 85 | :group 'erc-autojoin |
| 86 | :version "24.1" | 86 | :version "24.5" |
| 87 | :type '(choice (const :tag "On Connection" connect) | 87 | :type '(choice (const :tag "On Connection" connect) |
| 88 | (const :tag "When Identified" ident))) | 88 | (const :tag "When Identified" ident))) |
| 89 | 89 | ||
| @@ -93,7 +93,7 @@ This only takes effect if `erc-autojoin-timing' is `ident'. | |||
| 93 | If NickServ identification occurs before this delay expires, ERC | 93 | If NickServ identification occurs before this delay expires, ERC |
| 94 | autojoins immediately at that time." | 94 | autojoins immediately at that time." |
| 95 | :group 'erc-autojoin | 95 | :group 'erc-autojoin |
| 96 | :version "24.1" | 96 | :version "24.5" |
| 97 | :type 'integer) | 97 | :type 'integer) |
| 98 | 98 | ||
| 99 | (defcustom erc-autojoin-domain-only t | 99 | (defcustom erc-autojoin-domain-only t |
diff --git a/lisp/erc/erc-match.el b/lisp/erc/erc-match.el index b10da96f6f4..a8a4e58362c 100644 --- a/lisp/erc/erc-match.el +++ b/lisp/erc/erc-match.el | |||
| @@ -237,7 +237,7 @@ current-nick, keyword, pal, dangerous-host, fool" | |||
| 237 | useful for excluding all the things like MOTDs from the server | 237 | useful for excluding all the things like MOTDs from the server |
| 238 | and other miscellaneous functions." | 238 | and other miscellaneous functions." |
| 239 | :group 'erc-match | 239 | :group 'erc-match |
| 240 | :version "24.3" | 240 | :version "24.5" |
| 241 | :type 'boolean) | 241 | :type 'boolean) |
| 242 | 242 | ||
| 243 | ;; Internal variables: | 243 | ;; Internal variables: |
diff --git a/lisp/erc/erc-stamp.el b/lisp/erc/erc-stamp.el index 39ffbb4bf38..37982069abe 100644 --- a/lisp/erc/erc-stamp.el +++ b/lisp/erc/erc-stamp.el | |||
| @@ -151,7 +151,7 @@ the minibuffer." | |||
| 151 | "Whether the timestamps should be intangible, i.e. prevent the point | 151 | "Whether the timestamps should be intangible, i.e. prevent the point |
| 152 | from entering them and instead jump over them." | 152 | from entering them and instead jump over them." |
| 153 | :group 'erc-stamp | 153 | :group 'erc-stamp |
| 154 | :version "25.1" | 154 | :version "24.5" |
| 155 | :type 'boolean) | 155 | :type 'boolean) |
| 156 | 156 | ||
| 157 | (defface erc-timestamp-face '((t :weight bold :foreground "green")) | 157 | (defface erc-timestamp-face '((t :weight bold :foreground "green")) |
diff --git a/lisp/erc/erc.el b/lisp/erc/erc.el index 37b24eaaa60..4acb7340fb2 100644 --- a/lisp/erc/erc.el +++ b/lisp/erc/erc.el | |||
| @@ -104,7 +104,7 @@ | |||
| 104 | 104 | ||
| 105 | (defgroup erc-lurker nil | 105 | (defgroup erc-lurker nil |
| 106 | "Hide specified message types sent by lurkers" | 106 | "Hide specified message types sent by lurkers" |
| 107 | :version "24.3" | 107 | :version "24.5" |
| 108 | :group 'erc-ignore) | 108 | :group 'erc-ignore) |
| 109 | 109 | ||
| 110 | (defgroup erc-query nil | 110 | (defgroup erc-query nil |
| @@ -5291,7 +5291,7 @@ into the ERC buffer, that text is not sent to the IRC server. | |||
| 5291 | If the value is nil, `erc-send-current-line' always considers any | 5291 | If the value is nil, `erc-send-current-line' always considers any |
| 5292 | submitted line to be intentional." | 5292 | submitted line to be intentional." |
| 5293 | :group 'erc | 5293 | :group 'erc |
| 5294 | :version "24.4" | 5294 | :version "24.5" |
| 5295 | :type '(choice number (other :tag "disabled" nil))) | 5295 | :type '(choice number (other :tag "disabled" nil))) |
| 5296 | 5296 | ||
| 5297 | (defun erc-send-current-line () | 5297 | (defun erc-send-current-line () |
diff --git a/lisp/startup.el b/lisp/startup.el index a1d1c3120fb..c04b16c43c4 100644 --- a/lisp/startup.el +++ b/lisp/startup.el | |||
| @@ -1286,6 +1286,7 @@ the `--debug-init' option to view a complete error backtrace." | |||
| 1286 | (let (warned) | 1286 | (let (warned) |
| 1287 | (dolist (dir load-path) | 1287 | (dolist (dir load-path) |
| 1288 | (and (not warned) | 1288 | (and (not warned) |
| 1289 | (stringp dir) | ||
| 1289 | (string-equal (file-name-as-directory (expand-file-name dir)) | 1290 | (string-equal (file-name-as-directory (expand-file-name dir)) |
| 1290 | (expand-file-name user-emacs-directory)) | 1291 | (expand-file-name user-emacs-directory)) |
| 1291 | (setq warned t) | 1292 | (setq warned t) |
diff --git a/src/ChangeLog b/src/ChangeLog index b51f3c15a66..d44de652dde 100644 --- a/src/ChangeLog +++ b/src/ChangeLog | |||
| @@ -1,3 +1,17 @@ | |||
| 1 | 2014-11-10 Eli Zaretskii <eliz@gnu.org> | ||
| 2 | |||
| 3 | * fileio.c (Finsert_file_contents): Invalidate buffer caches also | ||
| 4 | when the inserted text does not need decoding. (Bug#18982) | ||
| 5 | |||
| 6 | 2014-11-10 Jan Djärv <jan.h.d@swipnet.se> | ||
| 7 | |||
| 8 | * nsterm.h (EmacsScroller): judge returns bool. | ||
| 9 | |||
| 10 | * nsterm.m (ns_set_vertical_scroll_bar): Release bar. | ||
| 11 | (ns_judge_scroll_bars): Only set removed if judge returns true. | ||
| 12 | (judge): Returns bool == condemned. Remove self from window. | ||
| 13 | (setPosition:portion:whole:): Remove raise SIGIO (Bug#18757). | ||
| 14 | |||
| 1 | 2014-11-10 Stefan Monnier <monnier@iro.umontreal.ca> | 15 | 2014-11-10 Stefan Monnier <monnier@iro.umontreal.ca> |
| 2 | 16 | ||
| 3 | * keyboard.c (command_loop_1): Record this-command in recent-keys. | 17 | * keyboard.c (command_loop_1): Record this-command in recent-keys. |
diff --git a/src/fileio.c b/src/fileio.c index cdbd0be28ad..7d7b0b3148f 100644 --- a/src/fileio.c +++ b/src/fileio.c | |||
| @@ -4329,8 +4329,11 @@ by calling `format-decode', which see. */) | |||
| 4329 | coding_system = CODING_ID_NAME (coding.id); | 4329 | coding_system = CODING_ID_NAME (coding.id); |
| 4330 | } | 4330 | } |
| 4331 | else if (inserted > 0) | 4331 | else if (inserted > 0) |
| 4332 | adjust_after_insert (PT, PT_BYTE, PT + inserted, PT_BYTE + inserted, | 4332 | { |
| 4333 | inserted); | 4333 | invalidate_buffer_caches (current_buffer, PT, PT + inserted); |
| 4334 | adjust_after_insert (PT, PT_BYTE, PT + inserted, PT_BYTE + inserted, | ||
| 4335 | inserted); | ||
| 4336 | } | ||
| 4334 | 4337 | ||
| 4335 | /* Call after-change hooks for the inserted text, aside from the case | 4338 | /* Call after-change hooks for the inserted text, aside from the case |
| 4336 | of normal visiting (not with REPLACE), which is done in a new buffer | 4339 | of normal visiting (not with REPLACE), which is done in a new buffer |
diff --git a/src/nsterm.h b/src/nsterm.h index 7997072dcac..b33e6b2ee08 100644 --- a/src/nsterm.h +++ b/src/nsterm.h | |||
| @@ -396,7 +396,7 @@ typedef float EmacsCGFloat; | |||
| 396 | - repeatScroll: (NSTimer *)sender; | 396 | - repeatScroll: (NSTimer *)sender; |
| 397 | - condemn; | 397 | - condemn; |
| 398 | - reprieve; | 398 | - reprieve; |
| 399 | - judge; | 399 | - (bool)judge; |
| 400 | @end | 400 | @end |
| 401 | 401 | ||
| 402 | 402 | ||
diff --git a/src/nsterm.m b/src/nsterm.m index 577b2a27724..64951da308f 100644 --- a/src/nsterm.m +++ b/src/nsterm.m | |||
| @@ -3803,6 +3803,7 @@ ns_set_vertical_scroll_bar (struct window *window, | |||
| 3803 | bar = XNS_SCROLL_BAR (window->vertical_scroll_bar); | 3803 | bar = XNS_SCROLL_BAR (window->vertical_scroll_bar); |
| 3804 | [bar removeFromSuperview]; | 3804 | [bar removeFromSuperview]; |
| 3805 | wset_vertical_scroll_bar (window, Qnil); | 3805 | wset_vertical_scroll_bar (window, Qnil); |
| 3806 | [bar release]; | ||
| 3806 | } | 3807 | } |
| 3807 | ns_clear_frame_area (f, left, top, width, height); | 3808 | ns_clear_frame_area (f, left, top, width, height); |
| 3808 | unblock_input (); | 3809 | unblock_input (); |
| @@ -3996,8 +3997,8 @@ ns_judge_scroll_bars (struct frame *f) | |||
| 3996 | { | 3997 | { |
| 3997 | view = [subviews objectAtIndex: i]; | 3998 | view = [subviews objectAtIndex: i]; |
| 3998 | if (![view isKindOfClass: [EmacsScroller class]]) continue; | 3999 | if (![view isKindOfClass: [EmacsScroller class]]) continue; |
| 3999 | [view judge]; | 4000 | if ([view judge]) |
| 4000 | removed = YES; | 4001 | removed = YES; |
| 4001 | } | 4002 | } |
| 4002 | 4003 | ||
| 4003 | if (removed) | 4004 | if (removed) |
| @@ -7227,9 +7228,10 @@ if (cols > 0 && rows > 0) | |||
| 7227 | } | 7228 | } |
| 7228 | 7229 | ||
| 7229 | 7230 | ||
| 7230 | - judge | 7231 | -(bool)judge |
| 7231 | { | 7232 | { |
| 7232 | NSTRACE (judge); | 7233 | NSTRACE (judge); |
| 7234 | bool ret = condemned; | ||
| 7233 | if (condemned) | 7235 | if (condemned) |
| 7234 | { | 7236 | { |
| 7235 | EmacsView *view; | 7237 | EmacsView *view; |
| @@ -7238,11 +7240,14 @@ if (cols > 0 && rows > 0) | |||
| 7238 | view = (EmacsView *)FRAME_NS_VIEW (frame); | 7240 | view = (EmacsView *)FRAME_NS_VIEW (frame); |
| 7239 | if (view != nil) | 7241 | if (view != nil) |
| 7240 | view->scrollbarsNeedingUpdate++; | 7242 | view->scrollbarsNeedingUpdate++; |
| 7243 | if (window) | ||
| 7244 | wset_vertical_scroll_bar (window, Qnil); | ||
| 7245 | window = 0; | ||
| 7241 | [self removeFromSuperview]; | 7246 | [self removeFromSuperview]; |
| 7242 | [self release]; | 7247 | [self release]; |
| 7243 | unblock_input (); | 7248 | unblock_input (); |
| 7244 | } | 7249 | } |
| 7245 | return self; | 7250 | return ret; |
| 7246 | } | 7251 | } |
| 7247 | 7252 | ||
| 7248 | 7253 | ||
| @@ -7297,11 +7302,6 @@ if (cols > 0 && rows > 0) | |||
| 7297 | #endif | 7302 | #endif |
| 7298 | } | 7303 | } |
| 7299 | 7304 | ||
| 7300 | /* Events may come here even if the event loop is not running. | ||
| 7301 | If we don't enter the event loop, the scroll bar will not update. | ||
| 7302 | So send SIGIO to ourselves. */ | ||
| 7303 | if (apploopnr == 0) raise (SIGIO); | ||
| 7304 | |||
| 7305 | return self; | 7305 | return self; |
| 7306 | } | 7306 | } |
| 7307 | 7307 | ||