From 740c1ca99997810dcd4c9a9ac4556f90e0713356 Mon Sep 17 00:00:00 2001 From: Thierry BM Date: Thu, 23 Feb 2017 19:14:01 -0500 Subject: [PATCH] Fix for the copy cell feature --- lisp/ein-cell.el | 2 +- lisp/ein-worksheet.el | 2 +- 2 files changed, 2 insertions(+), 2 deletions(-) diff --git a/lisp/ein-cell.el b/lisp/ein-cell.el index ffd03e0..610c159 100644 --- a/lisp/ein-cell.el +++ b/lisp/ein-cell.el @@ -174,7 +174,7 @@ See also: https://github.com/tkf/emacs-ipython-notebook/issues/94" (defclass ein:basecell () ((cell-type :initarg :cell-type :type string) (read-only :initarg :read-only :initform nil :type boolean) - (ewoc :initarg :ewoc :type ewoc) + (ewoc :initarg :ewoc :type ewoc :accessor ein:basecell--ewoc) (element :initarg :element :initform nil :type list :documentation "ewoc nodes") (element-names :initarg :element-names) diff --git a/lisp/ein-worksheet.el b/lisp/ein-worksheet.el index 6797a43..b83b219 100644 --- a/lisp/ein-worksheet.el +++ b/lisp/ein-worksheet.el @@ -448,7 +448,7 @@ kill-ring of Emacs (kill-ring for texts)." (defun ein:worksheet-insert-clone-below (ws cell pivot) (let ((clone (ein:cell-copy cell))) ;; Cell can be from another buffer, so reset `ewoc'. - (setf (ein:worksheet--ewoc clone) (ein:worksheet--ewoc ws)) + (setf (ein:basecell--ewoc clone) (ein:worksheet--ewoc ws)) ;(oset clone :ewoc (oref ws :ewoc)) (ein:worksheet-insert-cell-below ws clone pivot) clone))