diff options
| author | Joakim Verona | 2011-07-23 09:34:37 +0200 |
|---|---|---|
| committer | Joakim Verona | 2011-07-23 09:34:37 +0200 |
| commit | 37d53e76fafe8ba6732cbeb1c481a23ea5ade726 (patch) | |
| tree | a604697b2525954e1a712784cf1e936a9664c1de /src/editfns.c | |
| parent | de37acc4249c95bd02295f7c3a8c080297335a1d (diff) | |
| parent | 043604ee51e5b5e0d0f645b999a35a1609a16b24 (diff) | |
| download | emacs-37d53e76fafe8ba6732cbeb1c481a23ea5ade726.tar.gz emacs-37d53e76fafe8ba6732cbeb1c481a23ea5ade726.zip | |
experiment send key event to xwidget. this version had som bad merges from trunk so it seems unstble
Diffstat (limited to 'src/editfns.c')
| -rw-r--r-- | src/editfns.c | 7 |
1 files changed, 1 insertions, 6 deletions
diff --git a/src/editfns.c b/src/editfns.c index b20c38faacd..56ad99d199f 100644 --- a/src/editfns.c +++ b/src/editfns.c | |||
| @@ -194,12 +194,7 @@ DEFUN ("byte-to-string", Fbyte_to_string, Sbyte_to_string, 1, 1, 0, | |||
| 194 | } | 194 | } |
| 195 | 195 | ||
| 196 | DEFUN ("string-to-char", Fstring_to_char, Sstring_to_char, 1, 1, 0, | 196 | DEFUN ("string-to-char", Fstring_to_char, Sstring_to_char, 1, 1, 0, |
| 197 | doc: /* Return the first character in STRING. | 197 | doc: /* Return the first character in STRING. */) |
| 198 | A multibyte character is handled correctly. | ||
| 199 | The value returned is a Unicode codepoint if it is below #x110000 (in | ||
| 200 | hex). Codepoints beyond that are Emacs extensions of Unicode. In | ||
| 201 | particular, eight-bit characters are returned as codepoints in the | ||
| 202 | range #x3FFF80 through #x3FFFFF, inclusive. */) | ||
| 203 | (register Lisp_Object string) | 198 | (register Lisp_Object string) |
| 204 | { | 199 | { |
| 205 | register Lisp_Object val; | 200 | register Lisp_Object val; |