[elpa] 20/352: Poistetaan error-kutsu kielenvaihtofunktiosta

[Stefan Monnier]

monnier pushed a commit to branch master
in repository elpa.

commit 1968410f4c5857f34ccbbf24a2d02fc838b15844
Author: Teemu Likonen <address@hidden>
Date:   Sat May 16 17:52:21 2009 +0000

    Poistetaan error-kutsu kielenvaihtofunktiosta
    
    Kun funktiota kutsutaan Lisp-koodista, palautetaan vain "nil", mikäli
    parametriksi ei annettu merkkijonoa.
---
 wcheck-mode.el |    4 ++--
 1 files changed, 2 insertions(+), 2 deletions(-)

diff --git a/wcheck-mode.el b/wcheck-mode.el
index 2b5a9f6..0214ac5 100644
--- a/wcheck-mode.el
+++ b/wcheck-mode.el
@@ -99,8 +99,8 @@ oletuskieli."
                     default)
             comp nil t nil nil default)
            current-prefix-arg)))
-  (if (not (stringp language))
-      (error "Language must be a string")
+
+  (when (stringp language)
     (if global
         (setq-default wcheck-language language)
       (setq wcheck-language language)