summaryrefslogtreecommitdiff
path: root/Master/tlpkg/tlpsv/psv_view.ps
diff options
context:
space:
mode:
authorStaszek Wawrykiewicz <staw@gust.org.pl>2009-09-30 19:40:25 +0000
committerStaszek Wawrykiewicz <staw@gust.org.pl>2009-09-30 19:40:25 +0000
commit3d3a73217f3dc5f9eda59d6c4a35a86992609693 (patch)
tree14a1c0c6aaae0105dbd0d7e2e6f8f9bb96c716bc /Master/tlpkg/tlpsv/psv_view.ps
parent0ebb67b0754bebe853fd30c35217dbceccb7aa6e (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.ps18
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