Function: ps-get-size

ps-get-size is a byte-compiled function defined in ps-print.el.gz.

Signature

(ps-get-size SIZE MESS &optional ARG)

Source Code

;; Defined in /usr/src/emacs/lisp/ps-print.el.gz
(defun ps-get-size (size mess &optional arg)
  (let ((siz (cond ((numberp size)
		    size)
		   ((and (consp size)
			 (numberp (car size))
			 (numberp (cdr size)))
		    (if ps-landscape-mode
			(car size)
		      (cdr size)))
		   (t
		    -1))))
    (and (< siz 0)
	 (error "Invalid %s `%S'%s"
		mess size
		(if arg
		    (format-message " for `%S'" arg)
		  "")))
    siz))