From 33bebaa2f06d119a629301cb47daa908a37bf11d Mon Sep 17 00:00:00 2001 From: =?utf8?q?Vincent=20Bela=C3=AFche?= Date: Thu, 2 Jan 2014 23:54:37 +0100 Subject: [PATCH] Correct ses--file-format checking. --- lisp/ChangeLog | 5 +++++ lisp/ses.el | 2 +- 2 files changed, 6 insertions(+), 1 deletion(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 7ec7fc12c3f..570d900022f 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -12,6 +12,11 @@ * mail/rmail.el (rmail-get-coding-function): Variable. (rmail-get-coding-system): Use it. +2014-01-02 Vincent Belaïche + + * ses.el (ses-load): Correct handling for ses--file-format + checking. + 2014-01-02 Vincent Belaïche * ses.el (ses-initial-global-parameters-re): New defconst, a 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)) -- 2.39.2