From d18e0ca5dcc111a1d1b5c852dfa885690779412c Mon Sep 17 00:00:00 2001 From: Chris Mann Date: Sun, 19 Oct 2008 16:43:52 +1030 Subject: [PATCH] * wesnoth-mode.el (wesnoth-complete-macro, wesnoth-complete-preprocessor, wesnoth-complete-attribute, wesnoth-complete-tag): Ignore match properties. --- wesnoth-mode.el | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) diff --git a/wesnoth-mode.el b/wesnoth-mode.el index 3e64ed7..859902c 100644 --- a/wesnoth-mode.el +++ b/wesnoth-mode.el @@ -381,7 +381,7 @@ If COMPLETEP is non-nil, attempt to complete preprocessor at point." (save-excursion (back-to-indentation) (when (looking-at "#\\(\\w+\\)$") - (match-string 1))))) + (match-string-no-properties 1))))) (preprocessor (or (wesnoth-element-completion completions "Preprocessor: " partial) partial)) @@ -444,7 +444,7 @@ If COMPLETEP is non-nil, attempt to complete the macro at point." (save-excursion (back-to-indentation) (when (looking-at "{\\(\\(\\w\\|_\\)*\\)") - (match-string 1))))) + (match-string-no-properties 1))))) (macro (or (wesnoth-element-completion completions "Macro: " partial) partial)) (args (cadr (assoc macro macro-information)))) @@ -469,7 +469,7 @@ If COMPLETEP is non-nil, attempt to complete the attribute at point." (save-excursion (back-to-indentation) (when (looking-at "\\(\\(\\w\\|_\\)+\\)") - (match-string 1))))) + (match-string-no-properties 1))))) (attribute (or (wesnoth-element-completion completions "Attribute: " partial) partial))) @@ -497,7 +497,7 @@ If COMPLETEP is non-nil, attempt to complete tag at point." (save-excursion (back-to-indentation) (when (looking-at "\\[\\(\\(\\w\\|_\\)+\\)") - (match-string 1))))) + (match-string-no-properties 1))))) (tag (or (wesnoth-element-completion completions "Tag: " partial) partial)) (closedp -- 2.11.4.GIT