Correct ses--file-format checking.

2 files changed, 6 insertions, 1 deletions

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 7ec7fc12c3f..570d900022f 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -14,6 +14,11 @@
 
 2014-01-02  Vincent Belaïche  <vincentb1@users.sourceforge.net>
 
+        * ses.el (ses-load): Correct handling for ses--file-format
+        checking.
+
+2014-01-02  Vincent Belaïche  <vincentb1@users.sourceforge.net>
+
         * ses.el (ses-initial-global-parameters-re): New defconst, a
         specific regexp is needed now that ses.el can handle both
         file-format 2 (no local printers) and 3 (may have local printers).
diff --git a/lisp/ses.el b/lisp/ses.el
index cdf479398ed..2b8daa48ddc 100644
--- a/lisp/ses.el
+++ b/lisp/ses.el
@@ -1860,7 +1860,7 @@ Does not execute cell formulas or print functions."
         (insert "(ses-header-row 0)\n")
         (ses-set-parameter 'ses--file-format 3)
         (message "Upgrading from SES-1 file format")))
-    (or (> ses--file-format 3)
+    (or (<= ses--file-format 3)
         (error "This file needs a newer version of the SES library code"))
     ;; Initialize cell array.
     (setq ses--cells (make-vector ses--numrows nil))