emacs-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[Emacs-diffs] trunk r118197: * ses.el (macroexp): add require for this p


From: Vincent Belaïche
Subject: [Emacs-diffs] trunk r118197: * ses.el (macroexp): add require for this package, so that
Date: Sat, 25 Oct 2014 10:40:34 +0000
User-agent: Bazaar (2.6b2)

------------------------------------------------------------
revno: 118197
revision-id: address@hidden
parent: address@hidden
committer: Vincent Belaïche  <address@hidden>
branch nick: trunk
timestamp: Sat 2014-10-25 12:40:14 +0200
message:
  * ses.el (macroexp): add require for this package, so that
  function `ses--cell' gets macroexp-quote --- this change was
  supposed to be in my previous commit, but left out by mistake.
  (ses--cell): Do not make formula a macroexp-quote of value when
  value, not formula, is *skip*.
modified:
  lisp/ChangeLog                 changelog-20091113204419-o5vbwnq5f7feedwu-1432
  lisp/ses.el                    ses.el-20091113204419-o5vbwnq5f7feedwu-2447
=== modified file 'lisp/ChangeLog'
--- a/lisp/ChangeLog    2014-10-24 23:02:25 +0000
+++ b/lisp/ChangeLog    2014-10-25 10:40:14 +0000
@@ -1,3 +1,11 @@
+2014-10-25  Vincent Belaïche  <address@hidden>
+
+       * ses.el (macroexp): add require for this package, so that
+       function `ses--cell' gets macroexp-quote --- this change was
+       supposed to be in my previous commit, but left out by mistake.
+       (ses--cell): Do not make formula a macroexp-quote of value when
+       value, not formula, is *skip*.
+
 2014-10-24  Vincent Belaïche  <address@hidden>
 
        * ses.el (macroexp): add require for this package, so that function

=== modified file 'lisp/ses.el'
--- a/lisp/ses.el       2014-10-24 23:02:25 +0000
+++ b/lisp/ses.el       2014-10-25 10:40:14 +0000
@@ -56,6 +56,7 @@
 ;;; Code:
 
 (require 'unsafep)
+(require 'macroexp)
 (eval-when-compile (require 'cl-lib))
 
 
@@ -491,7 +492,7 @@
   (let ((rowcol (ses-sym-rowcol sym)))
     (ses-formula-record formula)
     (ses-printer-record printer)
-    (unless (or formula (eq formula '*skip*))
+    (unless (or formula (eq value '*skip*))
       (setq formula (macroexp-quote value)))
     (or (atom formula)
        (eq safe-functions t)


reply via email to

[Prev in Thread] Current Thread [Next in Thread]