Reverted 2014-01-02T22:54:37Z!vincentb1@users.sourceforge.net.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 6d5cadb7d784ef4daab612fb24d1d106a08b9fa8..f74ede68cd165e4d3106e01fd7baa99d3d6d69b5 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -45,11 +45,6 @@
        * mail/rmail.el (rmail-get-coding-function): Variable.
        (rmail-get-coding-system): Use it.
 
-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

diff --git a/lisp/ses.el b/lisp/ses.el
index 2b8daa48ddc1e67be06b884099821e790ecfa6fd..cdf479398ed64d9b1728c4d877bb50fa5760b216 100644 (file)
--- 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))