emacs-devel
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

Re: strange behavior in regexp matching


From: Reiner Steib
Subject: Re: strange behavior in regexp matching
Date: Mon, 17 Mar 2008 15:26:43 +0100
User-agent: Gnus/5.110007 (No Gnus v0.7) Emacs/22.1.92 (gnu/linux)

On Mon, Mar 17 2008, Andreas Schwab wrote:

> Does it help to change the test to
> (re-search-forward "[[:multibyte:]]" to t)?

No, it[1] doesn't help:

,----
| Debugger entered--Lisp error: (error "Multibyte character in QP encoding 
region")
|   signal(error ("Multibyte character in QP encoding region"))
|   error("Multibyte character in QP encoding region")
|   (if (re-search-forward "[[:multibyte:]]" to t) (error "Multibyte character 
in QP encoding region"))
|   (save-excursion (goto-char from) (if (re-search-forward "[[:multibyte:]]" 
to t) (error "Multibyte character in QP encoding region")) (save-restriction 
(narrow-to-region from to) (goto-char ...) (while ... ...) (goto-char ...) 
(while ... ... ...) (let ... ...)))
|   quoted-printable-encode-region(1 4 nil "-\n\f !#-'*+0-9A-Z\\^`-~")
|   rfc2047-q-encode-string("Bä")
|   rfc2047-encode-1(9 "B\x00e4r" utf-8 rfc2047-q-encode-string "=?utf-8?Q?" " 
" "")
|   rfc2047-encode(71 74)
|   rfc2047-encode-region(71 75)
|   mail-encode-encoded-word-buffer()
|   mml-to-mime()
|   mml-preview((4))
|   call-interactively(mml-preview t nil)
|   execute-extended-command((4))
|   call-interactively(execute-extended-command nil nil)
`----

Bye, Reiner.

[1]
--8<---------------cut here---------------start------------->8---
--- qp.el.~1.28.~       2008-01-09 20:36:04.000000000 +0100
+++ qp.el       2008-03-17 15:22:06.000000000 +0100
@@ -107,8 +107,7 @@
     (setq class "\010-\012\014\040-\074\076-\177"))
   (save-excursion
     (goto-char from)
-    (if (re-search-forward (mm-string-to-multibyte "[^\x0-\x7f\x80-\xff]")
-                          to t)
+    (if (re-search-forward "[[:multibyte:]]" to t)
        (error "Multibyte character in QP encoding region"))
     (save-restriction
       (narrow-to-region from to)
--8<---------------cut here---------------end--------------->8---

-- 
       ,,,
      (o o)
---ooO-(_)-Ooo---  |  PGP key available  |  http://rsteib.home.pages.de/




reply via email to

[Prev in Thread] Current Thread [Next in Thread]