• Home
  • History
  • Annotate
  • Raw
  • Download
  • only in /macosx-10.10/emacs-93/emacs/lisp/

Lines Matching +defs:right +defs:margin +defs:width

240 ;; margins in the printed paper: the top margin is the margin between the top
293 ;; `ps-left-margin' `ps-inter-column' `ps-right-margin'
311 ;; `ps-bottom-margin' `ps-top-margin' `ps-header-offset' `ps-footer-offset'
335 ;; the top margin is the margin between the top of the page and the printed
337 ;; the bottom margin is the margin between the bottom of the page and the
347 ;; directory; on the right, the page number and date of printing. The default
353 ;; When printing on duplex printers, left and right are reversed so that the
381 ;; border-width Specify the border width.
422 ;; and `ps-right-header'.
424 ;; the left or right side of the header. Each element of the list should be a
467 ;; `ps-left-footer', `ps-right-footer' and `ps-footer-frame-alist'. These
480 ;; ps-right-footer nil
603 ;; setpagedevice affects the left margin.
613 ;; or right. If `ps-spool-tumble' is non-nil, produces output suitable for
638 ;; The variable `ps-n-up-margin' specifies the margin in points between the
653 ;; right-top 4 3 2 1 right-bottom 12 11 10 9
661 ;; top-right 10 7 4 1 bottom-right 12 9 6 3
811 ;; on next page. Visually, valid values are (the character `+' at right of
853 ;; It is evaluated once before any printing process. This is the right
880 ;; size (usually 10) and the corresponding line height, width of a space and
881 ;; average character width.
954 ;; For Helvetica 10 point, the line height is 11.56, the space width is 2.78
955 ;; and a crude estimate of average character width is 5.09243
967 ;; (space-width . 2.78)
968 ;; (avg-char-width . 5.09243)))
993 ;; (space-width . 6.0)
994 ;; (avg-char-width . 6.0))
1014 ;; (avg-char-width . 6.0)
1015 ;; (space-width . 6.0)
1038 ;; be printed in bold or italic, but their guesses aren't always right. For
1179 ;; To avoid wrapping too many lines, you may want to adjust the left and right
1228 ;; `ps-left-footer', `ps-right-footer', `ps-footer-frame-alist' and
1314 ;; particular, bold or italic fonts don't print in the right background color.
1875 "*List associating a symbolic paper type to its width, height and doc media.
2053 (defcustom ps-n-up-margin (/ (* 72 1.0) 2.54) ; 1 cm
2054 "*Specify the margin in points between the sheet border and n-up printing."
2075 `right-top' 4 3 2 1 `right-bottom' 12 11 10 9
2083 `top-right' 10 7 4 1 `bottom-right' 12 9 6 3
2091 (const right-top) (const right-bottom)
2093 (const top-right) (const bottom-right))
2134 Visually, valid values are (the character `+' at right of each column indicates
2309 from lower left corner to upper right corner.
2348 (defcustom ps-left-margin (/ (* 72 2.0) 2.54) ; 2 cm
2349 "*Left margin in points (1/72 inch)."
2354 (defcustom ps-right-margin (/ (* 72 2.0) 2.54) ; 2 cm
2355 "*Right margin in points (1/72 inch)."
2380 (defcustom ps-bottom-margin (/ (* 72 1.5) 2.54) ; 1.5 cm
2381 "*Bottom margin in points (1/72 inch)."
2386 (defcustom ps-top-margin (/ (* 72 1.5) 2.54) ; 1.5 cm
2387 "*Top margin in points (1/72 inch)."
2426 changing variables `ps-left-header' and `ps-right-header'."
2440 (border-width . 0.4)
2461 `border-width' Specify the border width.
2492 (const :format "" border-width)
2527 `ps-right-footer'."
2541 (border-width . 0.4)
2574 (const :format "" border-width)
2668 affects the left margin.
2686 start on the right page. Also, if headers are turned on, the headers will be
2698 or right. If `ps-spool-tumble' is non-nil, produces output suitable for
2716 (space-width . 6.0)
2717 (avg-char-width . 6.0))
2725 (space-width . 2.78)
2726 (avg-char-width . 5.09243))
2734 (space-width . 2.5)
2735 (avg-char-width . 4.71432))
2743 (space-width . 2.5)
2744 (avg-char-width . 5.08676))
2752 (space-width . 2.2796)
2753 (avg-char-width . 4.17579))
2761 (space-width . 2.78)
2762 (avg-char-width . 5.31162))
2769 (space-width . 2.77)
2770 (avg-char-width . 5.45189))
2776 (space-width . 2.8)
2777 (avg-char-width . 5.51351))
2783 (space-width . 3.4)
2784 (avg-char-width . 6.05946))
2790 (space-width . 3.2)
2791 (avg-char-width . 5.67027))
2797 (space-width . 2.5)
2798 (avg-char-width . 3.24324))
2803 (space-width . 2.78)
2804 (avg-char-width . 2.78))
2809 (space-width . 2.2)
2810 (avg-char-width . 4.10811))
2817 (space-width . 2.2)
2818 (avg-char-width . 4.10811))
2822 reference size, line height, space width, average character width.
2857 (const :format "" space-width)
2860 (const :format "" avg-char-width)
3207 (defcustom ps-right-header
3210 "*The items to display (each on a line) on the right part of the page header.
3262 (defcustom ps-right-footer
3265 "*The items to display (each on a line) on the right part of the page footer.
3637 '(30 . ps-left-margin)
3638 '(30 . ps-right-margin)
3640 '(30 . ps-bottom-margin)
3641 '(30 . ps-top-margin)
3662 '(30 . ps-right-header)
3664 '(30 . ps-right-footer)
3667 '(23 . ps-n-up-margin)
4041 (defmacro ps-page-dimensions-get-width (dims) `(nth 0 ,dims))
4047 (defvar ps-print-width nil)
4051 (defvar ps-width-remaining nil)
4364 (defsubst ps-space-width (font-sym)
4365 "The width of a space character, for generating PostScript.
4367 (get font-sym 'space-width))
4369 (defsubst ps-avg-char-width (font-sym)
4370 "The average width, in points, of a character, for generating PostScript.
4374 (get font-sym 'avg-char-width))
4391 (icw (ps-avg-char-width 'ps-font-for-text)) ; initial character width
4392 (print-width (progn (ps-get-page-dimensions)
4393 ps-print-width))
4396 cw-min ; minimum character width
4399 cw-max ; maximum character width
4402 cw ; current character width
4406 nb-cpl-max (floor (/ print-width cw-min))
4408 nb-cpl-min (floor (/ print-width cw-max))
4416 (setq cw (/ print-width (float nb-cpl))
4493 (put sym 'space-width (ps-size-scale 'space-width))
4494 (put sym 'avg-char-width (ps-size-scale 'avg-char-width))
4501 page-width page-height)
4518 (setq page-width (ps-page-dimensions-get-width page-dimensions)
4523 ;; exchange width and height
4524 (setq page-width (prog1 page-height (setq page-height page-width))))
4526 ;; It is used to get the lower right corner (only in landscape mode)
4530 ;; page-width == lm + n * pw + (n - 1) * ic + rm
4531 ;; => pw == (page-width - lm -rm - (n - 1) * ic) / n
4532 (setq ps-print-width (/ (- page-width
4533 ps-left-margin ps-right-margin
4536 (if (<= ps-print-width 0)
4538 page-width == %s
4539 ps-left-margin == %s
4540 ps-right-margin == %s
4544 page-width == lm + n * print-width + (n - 1) * ic + rm
4545 => print-width == %d !"
4546 page-width
4547 ps-left-margin
4548 ps-right-margin
4551 ps-print-width))
4554 (- page-height ps-bottom-margin ps-top-margin))
4557 ps-top-margin == %s
4558 ps-bottom-margin == %s
4561 ps-top-margin
4562 ps-bottom-margin
4578 ps-top-margin == %s
4579 ps-bottom-margin == %s
4585 ps-top-margin
4586 ps-bottom-margin
4608 ps-top-margin == %s
4609 ps-bottom-margin == %s
4615 ps-top-margin
4616 ps-bottom-margin
4818 ;; `ps-right-header', `ps-left-footer' and `ps-right-footer'.
4848 ps-rh-cache (ps-generate-string-list ps-right-header)))
4851 ps-rf-cache (ps-generate-string-list ps-right-footer)))
4901 (ps-float-format (or (cdr (assq 'border-width alist)) 0.4))
5201 ;; normal size is landscaped, that is, the height is smaller than width.
5404 (right-top
5413 (right-bottom
5440 (top-right
5449 (bottom-right
5537 (format " %d" (round (ps-page-dimensions-get-width dimensions)))
5569 (- (* (+ ps-print-width ps-inter-column)
5572 (format "/PrintWidth %s def\n" ps-print-width)
5575 (format "/LeftMargin %s def\n" ps-left-margin)
5576 (format "/RightMargin %s def\n" ps-right-margin)
5579 (format "/BottomMargin %s def\n" ps-bottom-margin)
5580 (format "/TopMargin %s def\n" ps-top-margin) ; not used
5644 (format "/N-Up-Margin %s def\n" ps-n-up-margin)
5723 (/ (ps-lookup 'space-width) (ps-lookup 'size)))))
6025 (setq ps-width-remaining ps-print-width
6037 (or ps-rh-cache ps-right-header))
6046 (or ps-rf-cache ps-right-footer))
6074 (setq ps-width-remaining ps-print-width
6083 (setq ps-width-remaining ps-print-width
6087 (defun ps-find-wrappoint (from to char-width)
6088 (let ((avail (truncate (/ ps-width-remaining char-width)))
6091 (cons to (* todo char-width))
6092 (cons (+ from avail) ps-width-remaining))))
6096 (ps-avg-char-width 'ps-font-for-text)))
6106 (ps-avg-char-width 'ps-font-for-text)))
6116 (ps-space-width 'ps-font-for-text)))
6125 (plotted-width (cdr wrappoint)))
6127 ps-width-remaining (- ps-width-remaining plotted-width))
6320 (char-width (ps-avg-char-width 'ps-font-for-text))
6321 (wrappoint (ps-find-wrappoint from to char-width)))
6324 (setq ps-width-remaining (- ps-width-remaining (* len char-width)))
7016 ps-left-margin (/ (* 72 1.0) 2.54) ; 1.0 cm
7017 ps-right-margin (/ (* 72 1.0) 2.54) ; 1.0 cm
7019 ps-bottom-margin (/ (* 72 1.5) 2.54) ; 1.5 cm
7020 ps-top-margin (/ (* 72 1.5) 2.54) ; 1.5 cm
7060 Where ENDPOS is the end position of the sequence and RUN-WIDTH is the width of