Mercurial > hg > xemacs-beta
comparison lisp/packages/ps-print.el @ 209:41ff10fd062f r20-4b3
Import from CVS: tag r20-4b3
| author | cvs |
|---|---|
| date | Mon, 13 Aug 2007 10:04:58 +0200 |
| parents | 318232e2a3f0 |
| children |
comparison
equal
deleted
inserted
replaced
| 208:f427b8ec4379 | 209:41ff10fd062f |
|---|---|
| 2726 | 2726 |
| 2727 (defun ps-print-ensure-fontified (start end) | 2727 (defun ps-print-ensure-fontified (start end) |
| 2728 (if (and (boundp 'lazy-lock-mode) lazy-lock-mode) | 2728 (if (and (boundp 'lazy-lock-mode) lazy-lock-mode) |
| 2729 (if (fboundp 'lazy-lock-fontify-region) | 2729 (if (fboundp 'lazy-lock-fontify-region) |
| 2730 (lazy-lock-fontify-region start end) ; the new | 2730 (lazy-lock-fontify-region start end) ; the new |
| 2731 (lazy-lock-fontify-buffer)))) ; the old | 2731 (lazy-lock-fontify-buffer))) ; the old |
| 2732 (if (and (boundp 'lazy-shot-mode) lazy-shot-mode) ;; temporary untill | |
| 2733 (lazy-shot-fontify-region start end))) ;; lazy-shot is renamed | |
| 2734 | |
| 2732 | 2735 |
| 2733 (defun ps-generate-postscript-with-faces (from to) | 2736 (defun ps-generate-postscript-with-faces (from to) |
| 2734 ;; Build the reference lists of faces if necessary. | 2737 ;; Build the reference lists of faces if necessary. |
| 2735 (if (or ps-always-build-face-reference | 2738 (if (or ps-always-build-face-reference |
| 2736 ps-build-face-reference) | 2739 ps-build-face-reference) |