Function: table--remove-cell-properties

table--remove-cell-properties is a byte-compiled function defined in table.el.gz.

Signature

(table--remove-cell-properties BEG END &optional OBJECT)

Documentation

Remove all cell properties.

If OBJECT is non-nil cell properties are removed from the OBJECT instead of the current buffer and returns the OBJECT.

Source Code

;; Defined in /usr/src/emacs/lisp/textmodes/table.el.gz
(defun table--remove-cell-properties (beg end &optional object)
  "Remove all cell properties.
If OBJECT is non-nil cell properties are removed from the OBJECT
instead of the current buffer and returns the OBJECT."
  (while (< beg end)
    (let ((next (next-single-property-change beg 'table-cell object end)))
      (if (get-text-property beg 'table-cell object)
	  (remove-text-properties beg next
				  (list
				   'table-cell nil
				   'table-justify nil
				   'table-valign nil
				   'font-lock-face nil
				   'rear-nonsticky nil
				   'cursor-sensor-functions nil
				   'keymap nil)
				  object))
      (setq beg next)))
  object)