[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] 157/352: Lisätään predikaattifunktio wcheck-list-of-strings-p
From: |
Stefan Monnier |
Subject: |
[elpa] 157/352: Lisätään predikaattifunktio wcheck-list-of-strings-p |
Date: |
Mon, 07 Jul 2014 14:03:29 +0000 |
monnier pushed a commit to branch master
in repository elpa.
commit baa11fc3eea90969ad3b21936f81521f345db686
Author: Teemu Likonen <address@hidden>
Date: Mon Aug 2 12:18:44 2010 +0000
Lisätään predikaattifunktio wcheck-list-of-strings-p
---
wcheck-mode.el | 8 ++++++--
1 files changed, 6 insertions(+), 2 deletions(-)
diff --git a/wcheck-mode.el b/wcheck-mode.el
index 4fdee0e..8089c97 100644
--- a/wcheck-mode.el
+++ b/wcheck-mode.el
@@ -1042,8 +1042,7 @@ defined in `wcheck-language-data-defaults'."
(eq key 'regexp-discard))
(if (stringp value) value default-value))
((eq key 'args)
- (cond ((and (listp value)
- (not (memq nil (mapcar #'stringp value))))
+ (cond ((wcheck-list-of-strings-p value)
value)
((stringp value)
;; For backwards compatibility
@@ -1070,6 +1069,11 @@ defined in `wcheck-language-data-defaults'."
t))
+(defun wcheck-list-of-strings-p (object)
+ (and (listp object)
+ (not (memq nil (mapcar #'stringp object)))))
+
+
(defun wcheck-error-program-not-executable (language program)
(if (and (stringp program)
(> (length program) 0))
- [elpa] 146/352: Käytetään #'-lukijamakroa funktion edessä, (continued)
- [elpa] 146/352: Käytetään #'-lukijamakroa funktion edessä, Stefan Monnier, 2014/07/07
- [elpa] 122/352: Poistetaan turha roina funktiosta wcheck-send-words, Stefan Monnier, 2014/07/07
- [elpa] 143/352: Sallitaan connection-argumentille arvoksi sekä "t" että "pty", Stefan Monnier, 2014/07/07
- [elpa] 289/352: Merge branch 'action-autoselect', Stefan Monnier, 2014/07/07
- [elpa] 309/352: Version 2012.01.29 (update copyrights too), Stefan Monnier, 2014/07/07
- [elpa] 311/352: Add full licence text (COPYING), Stefan Monnier, 2014/07/07
- [elpa] 209/352: wcheck-define-condition-makroon lisää automatiikkaa, Stefan Monnier, 2014/07/07
- [elpa] 151/352: Uusi ominaisuus: mahdollisuus lukea vain tiettyjä alueita puskurista, Stefan Monnier, 2014/07/07
- [elpa] 325/352: Archive README.org too in elpa tar package, Stefan Monnier, 2014/07/07
- [elpa] 334/352: Mention ~/.emacs.d/init.el too as one of the Emacs init files, Stefan Monnier, 2014/07/07
- [elpa] 157/352: Lisätään predikaattifunktio wcheck-list-of-strings-p,
Stefan Monnier <=
- [elpa] 166/352: Varmatoimisempi wcheck-choose-suggestion-minibuffer, Stefan Monnier, 2014/07/07
- [elpa] 140/352: Päivitetään Copyright-vuosi, Stefan Monnier, 2014/07/07
- [elpa] 147/352: Korjataan muuttujan wcheck-language-data kuvausta, Stefan Monnier, 2014/07/07