diff options
| author | Jim Blandy | 1992-02-21 05:39:59 +0000 |
|---|---|---|
| committer | Jim Blandy | 1992-02-21 05:39:59 +0000 |
| commit | 3a2712f9beddf3de18504c4a1b857d3ce2b95391 (patch) | |
| tree | e74945d36861016476838afef0ca92d0b55a64d2 /src | |
| parent | a41f8bed219bb3f7f4aa438e60532d2789dfb067 (diff) | |
| download | emacs-3a2712f9beddf3de18504c4a1b857d3ce2b95391.tar.gz emacs-3a2712f9beddf3de18504c4a1b857d3ce2b95391.zip | |
*** empty log message ***
Diffstat (limited to 'src')
| -rw-r--r-- | src/window.c | 3 | ||||
| -rw-r--r-- | src/xterm.c | 22 |
2 files changed, 13 insertions, 12 deletions
diff --git a/src/window.c b/src/window.c index f81e7481c03..d53bd510c63 100644 --- a/src/window.c +++ b/src/window.c | |||
| @@ -590,8 +590,7 @@ window_display_table (w) | |||
| 590 | return 0; | 590 | return 0; |
| 591 | } | 591 | } |
| 592 | 592 | ||
| 593 | DEFUN ("set-window-display-table", | 593 | DEFUN ("set-window-display-table", Fset_window_display_table, Sset_window_display_table, 2, 2, 0, |
| 594 | Fset_window_display_table, Sset_window_display_table, 2, 2, 0, | ||
| 595 | "Set WINDOW's display-table to TABLE.") | 594 | "Set WINDOW's display-table to TABLE.") |
| 596 | (window, table) | 595 | (window, table) |
| 597 | register Lisp_Object window, table; | 596 | register Lisp_Object window, table; |
diff --git a/src/xterm.c b/src/xterm.c index 0f8da850112..05ad3bc588d 100644 --- a/src/xterm.c +++ b/src/xterm.c | |||
| @@ -65,13 +65,7 @@ the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA. */ | |||
| 65 | #endif | 65 | #endif |
| 66 | #endif | 66 | #endif |
| 67 | 67 | ||
| 68 | #ifdef NEED_TIME_H | 68 | #include "systime.h" |
| 69 | #include <time.h> | ||
| 70 | #else /* not NEED_TIME_H */ | ||
| 71 | #ifdef HAVE_TIMEVAL | ||
| 72 | #include <sys/time.h> | ||
| 73 | #endif /* HAVE_TIMEVAL */ | ||
| 74 | #endif /* not NEED_TIME_H */ | ||
| 75 | 69 | ||
| 76 | #include <fcntl.h> | 70 | #include <fcntl.h> |
| 77 | #include <stdio.h> | 71 | #include <stdio.h> |
| @@ -1915,6 +1909,14 @@ XTread_socket (sd, bufp, numchars, waitp, expected) | |||
| 1915 | KeySym keysym; | 1909 | KeySym keysym; |
| 1916 | XComposeStatus status; | 1910 | XComposeStatus status; |
| 1917 | char copy_buffer[80]; | 1911 | char copy_buffer[80]; |
| 1912 | int modifiers = event.xkey.state; | ||
| 1913 | |||
| 1914 | /* Some keyboards generate different characters | ||
| 1915 | depending on the state of the meta key, in an attempt | ||
| 1916 | to support non-English typists. It would be nice to | ||
| 1917 | keep this functionality somehow, but for now, we will | ||
| 1918 | just clear the meta-key flag to get the 'pure' character. */ | ||
| 1919 | event.xkey.state &= ~Mod1Mask; | ||
| 1918 | 1920 | ||
| 1919 | /* This will have to go some day... */ | 1921 | /* This will have to go some day... */ |
| 1920 | nbytes = XLookupString (&event.xkey, | 1922 | nbytes = XLookupString (&event.xkey, |
| @@ -1938,7 +1940,7 @@ XTread_socket (sd, bufp, numchars, waitp, expected) | |||
| 1938 | bufp->kind = non_ascii_keystroke; | 1940 | bufp->kind = non_ascii_keystroke; |
| 1939 | XSET (bufp->code, Lisp_Int, (unsigned) keysym - 0xff50); | 1941 | XSET (bufp->code, Lisp_Int, (unsigned) keysym - 0xff50); |
| 1940 | bufp->screen = XSCREEN (SCREEN_FOCUS_SCREEN (s)); | 1942 | bufp->screen = XSCREEN (SCREEN_FOCUS_SCREEN (s)); |
| 1941 | bufp->modifiers = x_convert_modifiers (event.xkey.state); | 1943 | bufp->modifiers = x_convert_modifiers (modifiers); |
| 1942 | XSET (bufp->timestamp, Lisp_Int, event.xkey.time); | 1944 | XSET (bufp->timestamp, Lisp_Int, event.xkey.time); |
| 1943 | bufp++; | 1945 | bufp++; |
| 1944 | count++; | 1946 | count++; |
| @@ -1950,7 +1952,7 @@ XTread_socket (sd, bufp, numchars, waitp, expected) | |||
| 1950 | 1952 | ||
| 1951 | if (nbytes == 1) | 1953 | if (nbytes == 1) |
| 1952 | { | 1954 | { |
| 1953 | if (event.xkey.state & Mod1Mask) | 1955 | if (modifiers & Mod1Mask) |
| 1954 | *copy_buffer |= METABIT; | 1956 | *copy_buffer |= METABIT; |
| 1955 | bufp->kind = ascii_keystroke; | 1957 | bufp->kind = ascii_keystroke; |
| 1956 | bufp->screen = XSCREEN (SCREEN_FOCUS_SCREEN (s)); | 1958 | bufp->screen = XSCREEN (SCREEN_FOCUS_SCREEN (s)); |
| @@ -2301,7 +2303,7 @@ XTread_socket (sd, bufp, numchars, waitp, expected) | |||
| 2301 | int mask = 1 << fd; | 2303 | int mask = 1 << fd; |
| 2302 | 2304 | ||
| 2303 | if (0 != select (fd + 1, &mask, (long *) 0, (long *) 0, | 2305 | if (0 != select (fd + 1, &mask, (long *) 0, (long *) 0, |
| 2304 | (struct timeval *) 0) | 2306 | (EMACS_TIME) 0) |
| 2305 | && !XStuffPending ()) | 2307 | && !XStuffPending ()) |
| 2306 | kill (getpid (), SIGHUP); | 2308 | kill (getpid (), SIGHUP); |
| 2307 | } | 2309 | } |