diff options
| author | Eli Zaretskii | 2014-07-17 18:37:48 +0300 |
|---|---|---|
| committer | Eli Zaretskii | 2014-07-17 18:37:48 +0300 |
| commit | e8bd4b948b82fd47359e0cf9a0a9ebb802c01e78 (patch) | |
| tree | 571d63ba5abed216e94f068f768579cff7eb0669 /src | |
| parent | 9180cde1125adced11ca5125ebed4e988d776539 (diff) | |
| download | emacs-e8bd4b948b82fd47359e0cf9a0a9ebb802c01e78.tar.gz emacs-e8bd4b948b82fd47359e0cf9a0a9ebb802c01e78.zip | |
Fix setting up coding-systems for clipboard access on MS-Windows and MS-DOS.
src/w32select.c (setup_windows_coding_system): Apply
CODING_ANNOTATION_MASK to the common_flags member of struct
coding_system. Reported by Martin Rudalics <rudalics@gmx.at>.
src/w16select.c (Fw16_get_clipboard_data): Apply
CODING_ANNOTATION_MASK to the common_flags member of struct
coding_system.
Diffstat (limited to 'src')
| -rw-r--r-- | src/ChangeLog | 9 | ||||
| -rw-r--r-- | src/w16select.c | 2 | ||||
| -rw-r--r-- | src/w32select.c | 2 |
3 files changed, 11 insertions, 2 deletions
diff --git a/src/ChangeLog b/src/ChangeLog index 737a5078b24..d395e97246d 100644 --- a/src/ChangeLog +++ b/src/ChangeLog | |||
| @@ -1,5 +1,14 @@ | |||
| 1 | 2014-07-17 Eli Zaretskii <eliz@gnu.org> | 1 | 2014-07-17 Eli Zaretskii <eliz@gnu.org> |
| 2 | 2 | ||
| 3 | * w32select.c (setup_windows_coding_system): Apply | ||
| 4 | CODING_ANNOTATION_MASK to the common_flags member of struct | ||
| 5 | coding_system. Reported by martin rudalics <rudalics@gmx.at>. | ||
| 6 | |||
| 7 | * w16select.c (Fw16_get_clipboard_data): Apply | ||
| 8 | CODING_ANNOTATION_MASK to the common_flags member of struct | ||
| 9 | coding_system. | ||
| 10 | |||
| 11 | |||
| 3 | * xdisp.c (init_iterator): Initialize it->stop_charpos to the | 12 | * xdisp.c (init_iterator): Initialize it->stop_charpos to the |
| 4 | buffer position where we are to start the iteration. | 13 | buffer position where we are to start the iteration. |
| 5 | (handle_invisible_prop): Record in it->stop_charpos the position | 14 | (handle_invisible_prop): Record in it->stop_charpos the position |
diff --git a/src/w16select.c b/src/w16select.c index 1e4d35b721b..4f88741f5c1 100644 --- a/src/w16select.c +++ b/src/w16select.c | |||
| @@ -600,7 +600,7 @@ DEFUN ("w16-get-clipboard-data", Fw16_get_clipboard_data, Sw16_get_clipboard_dat | |||
| 600 | coding.mode |= CODING_MODE_LAST_BLOCK; | 600 | coding.mode |= CODING_MODE_LAST_BLOCK; |
| 601 | /* We explicitly disable composition handling because selection | 601 | /* We explicitly disable composition handling because selection |
| 602 | data should not contain any composition sequence. */ | 602 | data should not contain any composition sequence. */ |
| 603 | coding.mode &= CODING_ANNOTATION_MASK; | 603 | coding.common_flags &= CODING_ANNOTATION_MASK; |
| 604 | decode_coding_object (&coding, Qnil, 0, 0, truelen, truelen, Qt); | 604 | decode_coding_object (&coding, Qnil, 0, 0, truelen, truelen, Qt); |
| 605 | ret = coding.dst_object; | 605 | ret = coding.dst_object; |
| 606 | Vlast_coding_system_used = CODING_ID_NAME (coding.id); | 606 | Vlast_coding_system_used = CODING_ID_NAME (coding.id); |
diff --git a/src/w32select.c b/src/w32select.c index 2ae25858bd2..7c21dde01a5 100644 --- a/src/w32select.c +++ b/src/w32select.c | |||
| @@ -670,7 +670,7 @@ setup_windows_coding_system (Lisp_Object coding_system, | |||
| 670 | which both apply to ISO6429 only. We don't know if these really | 670 | which both apply to ISO6429 only. We don't know if these really |
| 671 | need to be unset on Windows, but it probably doesn't hurt | 671 | need to be unset on Windows, but it probably doesn't hurt |
| 672 | either. */ | 672 | either. */ |
| 673 | coding->mode &= ~CODING_ANNOTATION_MASK; | 673 | coding->common_flags &= ~CODING_ANNOTATION_MASK; |
| 674 | coding->mode |= CODING_MODE_LAST_BLOCK | CODING_MODE_SAFE_ENCODING; | 674 | coding->mode |= CODING_MODE_LAST_BLOCK | CODING_MODE_SAFE_ENCODING; |
| 675 | } | 675 | } |
| 676 | 676 | ||