diff options
| author | Glenn Morris <rgm@gnu.org> | 2016-03-16 17:24:36 -0400 |
|---|---|---|
| committer | Glenn Morris <rgm@gnu.org> | 2016-03-16 17:24:36 -0400 |
| commit | ce533897e0523dd1930c74789641c5feb96473a3 (patch) | |
| tree | 904f8c2ed6b7dd749314a366a03970f8d4ef7db5 /lisp/xml.el | |
| parent | d6d164f6110a68a3acb816fd2ae7e55e71a18aef (diff) | |
| download | emacs-ce533897e0523dd1930c74789641c5feb96473a3.tar.gz | |
* lisp/xml.el (xml-parse-tag-1): Replace undefined function.
; string-empty-p is defined in subr-x, but this file does not load it.
Diffstat (limited to 'lisp/xml.el')
| -rw-r--r-- | lisp/xml.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/xml.el b/lisp/xml.el index 1802d04dfaf..414300cb402 100644 --- a/lisp/xml.el +++ b/lisp/xml.el @@ -580,7 +580,7 @@ Return one of: ;; However, if we're parsing incrementally, then we need to deal ;; with stray CDATA. (let ((s (xml-parse-string))) - (when (string-empty-p s) + (when (zerop (length s)) ;; We haven't consumed any input! We must throw an error in ;; order to prevent looping forever. (error "XML: (Not Well-Formed) Could not parse: %s" |