summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorUlrich Müller <ulm@gentoo.org>2008-03-30 10:07:24 +0000
committerUlrich Müller <ulm@gentoo.org>2008-03-30 10:07:24 +0000
commite5b874cc4cb2ebe4d49b2fc644e119deb04537cf (patch)
tree6affd8448b0e26d14eb923b4927a2510377dd18f
parentGet rid of byte-compiler warnings. (diff)
downloadebuild-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--ChangeLog2
-rw-r--r--gentoo-syntax.el5
2 files changed, 6 insertions, 1 deletions
diff --git a/ChangeLog b/ChangeLog
index aad7b8c..27b4ba9 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -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