Lines Matching +defs:kill +defs:buffer
99 "Context menu when mouse-3 is used on the header-line in an SES buffer."
107 "\C-c\C-n" ses-renarrow-buffer
181 clipboard-kill-region ses-kill-override
183 kill-line ses-delete-row
184 kill-region ses-kill-override
199 (define-key newmap [(menu-bar) edit cut] 'ses-kill-override)
268 ;;When compiling, create all the buffer locals and give them values
464 ;;Allow ARRAY to be a symbol for use in buffer-undo-list
479 "Like `kill-line', but no kill ring."
520 "Create buffer-local variables for cells. This is undoable."
522 buffer-undo-list)
533 ;;formula that refers to this cell is in the kill-ring and is later pasted
536 "Destroy buffer-local variables for cells. This is undoable."
543 buffer-undo-list))
544 (kill-local-variable sym))))
546 buffer-undo-list))
551 (push '(apply ses-reset-header-string) buffer-undo-list)
862 ;;Reconstruct special beginning-of-buffer attributes
945 (defun ses-narrowed-p () (/= (- (point-max) (point-min)) (buffer-size)))
995 ;;Special undo since it's outside the narrowed buffer
996 (let (buffer-undo-list)
999 (push `(apply ses-set-parameter ,def ,oldval ,elem) buffer-undo-list))))
1316 buffer-undo-list)
1323 (push `(apply ses-set-with-undo ,sym ,(symbol-value sym)) buffer-undo-list)
1329 (push `(apply ses-aset-with-undo ,array ,idx ,(aref array idx)) buffer-undo-list)
1339 "Parse the current buffer and sets up buffer-local variables. Does not
1347 (let ((params (condition-case nil (read (current-buffer)) (error nil))))
1359 (let (buffer-undo-list) ;This is not undoable
1385 (let* ((x (read (current-buffer)))
1396 (let ((widths (read (current-buffer)))
1398 (printers (read (current-buffer)))
1400 (def-printer (read (current-buffer)))
1402 (head-row (read (current-buffer)))
1432 Narrows the buffer to show only the print area. Gives it `read-only' and
1437 (was-modified (buffer-modified-p))
1446 ;;For the beginning of the buffer, we want the read-only and keymap
1464 (restore-buffer-modified-p nil)
1465 (buffer-disable-undo)
1466 (buffer-enable-undo)))
1473 "Cleanup when changing a buffer from SES mode to something else. Delete
1477 (was-modified (buffer-modified-p)))
1483 (set-buffer-modified-p nil))))
1499 (kill-all-local-variables)
1505 ;;SES deliberately puts lots of trailing whitespace in its buffer
1525 (let ((was-empty (zerop (buffer-size)))
1526 (was-modified (buffer-modified-p)))
1529 ;;Initialize buffer to contain one cell, for now
1544 (restore-buffer-modified-p was-modified)
1545 (buffer-disable-undo)
1546 (buffer-enable-undo)
1565 writes that have been deferred. If buffer-narrowing has been deferred,
1566 narrows the buffer now."
1568 (when (eq major-mode 'ses-mode) ;Otherwise, not our buffer anymore
1580 (push '(apply ses-widen) buffer-undo-list))
1582 ;;We're not allowed to narrow the buffer until after-find-file has
1620 "Set up `ses--header-string' as the buffer's header line.
1636 (setq x (buffer-substring-no-properties (point)
1777 "Reconstruct buffer based on cell data stored in Emacs variables."
1844 (barf-if-buffer-read-only)
1876 (barf-if-buffer-read-only)
1900 (barf-if-buffer-read-only)
1924 (or rowcol (signal 'end-of-buffer nil))
1937 (backward-char 1) ;Will signal 'beginning-of-buffer if appropriate
1950 (barf-if-buffer-read-only)
2062 (push `(apply ses-vector-delete ses--cells ,row 1) buffer-undo-list)
2085 (push '(apply ses-widen) buffer-undo-list)
2123 (push '(apply ses-widen) buffer-undo-list)
2244 (barf-if-buffer-read-only)
2252 (barf-if-buffer-read-only)
2272 (barf-if-buffer-read-only)
2301 (defadvice copy-region-as-kill (around ses-copy-region-as-kill
2304 kill ring. It probably doesn't make sense to copy keymap properties.
2316 ad-do-it ;Normal copy-region-as-kill
2317 (kill-new (ses-copy-region beg end))
2359 (defun ses-kill-override (beg end)
2360 "Generic override for any commands that kill text. We clear the killed
2366 (let ((buffer-read-only t))
2371 (buffer-read-only nil)))) ;The expected error
2372 ;;Because the buffer was marked read-only, the kill command turned itself
2374 ;;check whether the buffer really is read-only.
2375 (barf-if-buffer-read-only)
2384 If the text contains 'ses attributes (meaning it went to the kill-ring from a
2385 SES buffer), the formulas and print functions are restored for the cells. If
2404 (let ((text (current-kill (cond
2441 be different from those at kill-time. ARG is a list to indicate that
2593 newlines between rows. Result is placed in kill ring."
2599 newlines between rows. Result is placed in kill ring."
2605 rows. Result is placed in kill ring. The export is values unless
2631 (kill-new result)))
2659 (let (buffer-undo-list)
2661 (push `(apply ses-set-header-row ,oldval) buffer-undo-list))
2717 (defun ses-renarrow-buffer ()
2718 "Narrow the buffer so only the print area is visible. Use after \\[widen]."
2741 (push (cons (buffer-substring-no-properties (point) end)
2779 (with-current-buffer (window-buffer minibuffer-scroll-window)
2791 (with-current-buffer (window-buffer minibuffer-scroll-window)