diff options
| author | Staszek Wawrykiewicz <staw@gust.org.pl> | 2009-09-30 19:40:25 +0000 |
|---|---|---|
| committer | Staszek Wawrykiewicz <staw@gust.org.pl> | 2009-09-30 19:40:25 +0000 |
| commit | 3d3a73217f3dc5f9eda59d6c4a35a86992609693 (patch) | |
| tree | 14a1c0c6aaae0105dbd0d7e2e6f8f9bb96c716bc /Master/tlpkg/tlpsv/psv_view.ps | |
| parent | 0ebb67b0754bebe853fd30c35217dbceccb7aa6e (diff) | |
ps_view 5.12 update
git-svn-id: svn://tug.org/texlive/trunk@15578 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/tlpkg/tlpsv/psv_view.ps')
| -rw-r--r-- | Master/tlpkg/tlpsv/psv_view.ps | 18 |
1 files changed, 15 insertions, 3 deletions
diff --git a/Master/tlpkg/tlpsv/psv_view.ps b/Master/tlpkg/tlpsv/psv_view.ps index 9869e09b436..0124ef93a2d 100644 --- a/Master/tlpkg/tlpsv/psv_view.ps +++ b/Master/tlpkg/tlpsv/psv_view.ps @@ -2,7 +2,7 @@ %% Authors: P. Pianowski, P. Strzelczyk, B. Jackowski %% Address: BOP s.c. Gen. T. Bora-Komorowskiego, 80-377 Gda\'nsk, Poland %% bop@bop.com.pl -%% Copyright: (c) 2008 BOP s.c. +%% Copyright: (c) 2009 BOP s.c. %% Licence: GPL %% History: %% Creation date: Friday, January 15th, 1993 @@ -36,11 +36,12 @@ %% Version: 5.09, 02.07.2008 (LaTeX/HTML help added -- more formatting needed) %% Version: 5.10, 35.07.2008 (bug in DSC reading corrected) %% Version: 5.11, 06.02.2009 (some changes to compatibility with GS 8.64, and builtin inits) +%% Version: 5.12, 07.10.2009 (changes for Windows Vista and wxWidgets 2.8.10, TL2009 release) %% %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% userdict /view_dict 300 dict put view_dict begin -/PS_VIEW (PSView 5.11) def +/PS_VIEW (PSView 5.12) def %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% userdict begin @@ -2413,6 +2414,12 @@ dup /infullscreen exch def { (}{ps}{Save restart file}\n) print flush } def +/PRINT_dialog { + flush + (!PSV_DIALOG: P {}{Print}\n) print flush +} def + + /SPECIFIED_PAGE_dlgbox { flush (!PSV_DLGBOX: I {100,50}{Go to specified page}\n) print flush @@ -2796,7 +2803,8 @@ MENUCOMMANDS begin /SAVE_AS_RESTART {SAVE_AS_RESTART_dialog} def /LOAD_RESTART {rr} def /LOAD_FROM_RESTART {/CAUSE /LOAD_FROM_RESTART def LOAD_FROM_RESTART_dialog} def - /PRINT {pr} def +% /PRINT {pr} def + /PRINT {PRINT_dialog} def /LEAVE {quit} def /QUIT {q} def /UNDO {un} def @@ -3273,6 +3281,10 @@ end % MOUSECOMMANDS } if } def +/PRINTDIALOG { + pr +} def + /SAVEDIALOG { % dup 256 mod /filename_offset XD 256 idiv % dup 256 mod /filename_filter XD 256 idiv |