bug-gnu-emacs
[Top][All Lists]
Advanced

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

typo in xml.el


From: mah
Subject: typo in xml.el
Date: Wed, 19 Mar 2003 22:23:45 -0600

2003-03-19  Mark A. Hershberger  <mah@everybody.org>

        * xml.el (xml-parse-attlist): typo in attribute parsing.

*** xml.el.~1.17.~      Tue Mar 18 23:15:41 2003
--- xml.el      Wed Mar 19 22:20:56 2003
***************
*** 294,300 ****
        ;;  or a simple word ?
        (if (looking-at "\"\\([^\"]*\\)\"")
          (setq start-pos (match-beginning 0))
!       (if (looking-at "'\\([^']*\\)")
            (setq start-pos (match-beginning 0))
          (error "XML: Attribute values must be given between quotes")))
  
--- 294,300 ----
        ;;  or a simple word ?
        (if (looking-at "\"\\([^\"]*\\)\"")
          (setq start-pos (match-beginning 0))
!       (if (looking-at "'\\([^']*\\)'")
            (setq start-pos (match-beginning 0))
          (error "XML: Attribute values must be given between quotes")))
  
***************
*** 314,320 ****
        (goto-char start-pos)
        (if (looking-at "\"\\([^\"]*\\)\"")
          (goto-char (match-end 0))
!       (if (looking-at "'\\([^']*\\)")
            (goto-char (match-end 0))))
  
        (goto-char (- (re-search-forward "[^ \t\n\r]") 1))
--- 314,320 ----
        (goto-char start-pos)
        (if (looking-at "\"\\([^\"]*\\)\"")
          (goto-char (match-end 0))
!       (if (looking-at "'\\([^']*\\)'")
            (goto-char (match-end 0))))
  
        (goto-char (- (re-search-forward "[^ \t\n\r]") 1))





reply via email to

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