/[emacs]/emacs/src/xselect.c
ViewVC logotype

Diff of /emacs/src/xselect.c

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.148 by jhd, Tue Feb 8 21:26:44 2005 UTC revision 1.149 by handa, Mon Feb 14 00:59:42 2005 UTC
# Line 1908  lisp_data_to_selection_data (display, ob Line 1908  lisp_data_to_selection_data (display, ob
1908      }      }
1909    else if (STRINGP (obj))    else if (STRINGP (obj))
1910      {      {
1911        xassert (! STRING_MULTIBYTE (obj));        if (SCHARS (obj) < SBYTES (obj))
1912            /* OBJ is a multibyte string containing a non-ASCII char.  */
1913            Fsignal (Qerror, /* Qselection_error */
1914                     Fcons (build_string
1915                            ("Non-ASCII string must be encoded in advance"),
1916                            Fcons (obj, Qnil)));
1917        if (NILP (type))        if (NILP (type))
1918          type = QSTRING;          type = QSTRING;
1919        *format_ret = 8;        *format_ret = 8;

Legend:
Removed from v.1.148  
changed lines
  Added in v.1.149

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26