diff options
author | Ulrich Müller <ulm@gentoo.org> | 2008-03-30 10:07:24 +0000 |
---|---|---|
committer | Ulrich Müller <ulm@gentoo.org> | 2008-03-30 10:07:24 +0000 |
commit | e5b874cc4cb2ebe4d49b2fc644e119deb04537cf (patch) | |
tree | 6affd8448b0e26d14eb923b4927a2510377dd18f | |
parent | Get rid of byte-compiler warnings. (diff) | |
download | ebuild-mode-e5b874cc4cb2ebe4d49b2fc644e119deb04537cf.tar.gz ebuild-mode-e5b874cc4cb2ebe4d49b2fc644e119deb04537cf.tar.bz2 ebuild-mode-e5b874cc4cb2ebe4d49b2fc644e119deb04537cf.zip |
Don't use match-string-no-properties since it doesn't exist in XEmacs 21.4.
svn path=/gentoo-syntax/; revision=1036
-rw-r--r-- | ChangeLog | 2 | ||||
-rw-r--r-- | gentoo-syntax.el | 5 |
2 files changed, 6 insertions, 1 deletions
@@ -4,6 +4,8 @@ quieten the byte-compiler. (ebuild-mode): Call make-local-hook only for XEmacs. (eselect-mode): Ditto. + (ebuild-mode-get-keywords): Don't use match-string-no-properties + since the function doesn't exist in XEmacs 21.4. 2008-02-24 Ulrich Mueller <ulm@gentoo.org> diff --git a/gentoo-syntax.el b/gentoo-syntax.el index 6cc4b8d..4e0c91d 100644 --- a/gentoo-syntax.el +++ b/gentoo-syntax.el @@ -168,7 +168,10 @@ A formfeed is not considered whitespace by this function." (mapcar (lambda (s) (string-match "^\\([-~]?\\)\\(.*\\)" s) (cons (match-string 2 s) (match-string 1 s))) - (split-string (match-string-no-properties 1))))))) + (split-string + ;;(match-string-no-properties 1) ; not in XEmacs 21.4 + (buffer-substring-no-properties (match-beginning 1) + (match-end 1)))))))) (defun ebuild-mode-put-keywords (kw &optional noerror) (save-excursion |