Fix for the copy cell feature

This commit is contained in:
Thierry BM 2017-02-23 19:14:01 -05:00
parent 40af5bf381
commit 740c1ca999
2 changed files with 2 additions and 2 deletions

View file

@ -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)

View file

@ -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))