Function: table-insert-row-column

table-insert-row-column is an autoloaded, interactive and byte-compiled function defined in table.el.gz.

Signature

(table-insert-row-column ROW-COLUMN N)

Documentation

Insert row(s) or column(s).

See table-insert-row and table-insert-column.

Key Bindings

Source Code

;; Defined in /usr/src/emacs/lisp/textmodes/table.el.gz
;;;###autoload
(defun table-insert-row-column (row-column n)
  "Insert row(s) or column(s).
See `table-insert-row' and `table-insert-column'."
  (interactive
   (let ((n (prefix-numeric-value current-prefix-arg)))
     (if (< n 0) (setq n 1))
     (list (intern (let ((completion-ignore-case t)
			 (default (car table-insert-row-column-history)))
		     (downcase (completing-read
				(format-prompt
                                 "Insert %s row%s/column%s" default
				 (if (> n 1) (format "%d" n) "a")
				 (if (> n 1) "s" "")
				 (if (> n 1) "s" ""))
				'(("row") ("column"))
				nil t nil 'table-insert-row-column-history default))))
	   n)))
  (cond ((eq row-column 'row)
	 (table-insert-row n))
	((eq row-column 'column)
	 (table-insert-column n))))