From 5e76e9e4e255343e30145a73066afc8f1d8bbf1e Mon Sep 17 00:00:00 2001 From: Staszek Wawrykiewicz Date: Mon, 5 May 2008 18:52:56 +0000 Subject: tlpkg/tlpsv updated git-svn-id: svn://tug.org/texlive/trunk@7873 c570f23f-e606-0410-a88d-b1316a301751 --- Master/tlpkg/tlpsv/psv_view.ps | 32 +++++++++++++++++--------------- 1 file changed, 17 insertions(+), 15 deletions(-) (limited to 'Master/tlpkg/tlpsv/psv_view.ps') diff --git a/Master/tlpkg/tlpsv/psv_view.ps b/Master/tlpkg/tlpsv/psv_view.ps index 9bc2ac68b1f..575d7064e91 100644 --- a/Master/tlpkg/tlpsv/psv_view.ps +++ b/Master/tlpkg/tlpsv/psv_view.ps @@ -2174,14 +2174,14 @@ cross2 init_cross (&Up\tUp) (UP_KBD_MOVE) (KBD_MOVE) append_item (&Down\tDown) (DOWN_KBD_MOVE) (KBD_MOVE) append_item (&Align) (ALIGN) (TRANSFORM) append_submenu - (&Left edge\tCtrl+4) (LEFT_ALIGN) (ALIGN) append_item - (&Right edge\tCtrl+6) (RIGHT_ALIGN) (ALIGN) append_item - (&Top edge\tCtrl+8) (UP_ALIGN) (ALIGN) append_item - (&Bottom edge\tCtrl+2) (DOWN_ALIGN) (ALIGN) append_item - (Left &upper corner\tCtrl+7) (LEFT_UP_ALIGN) (ALIGN) append_item - (Right upp&er corner\tCtrl+9) (RIGHT_UP_ALIGN) (ALIGN) append_item - (Le&ft bottom corner\tCtrl+1) (LEFT_DOWN_ALIGN) (ALIGN) append_item - (Right bottom &corner\tCtrl+3) (RIGHT_DOWN_ALIGN) (ALIGN) append_item + (&Left edge\tCtrl+Num 4) (LEFT_ALIGN) (ALIGN) append_item + (&Right edge\tCtrl+Num 6) (RIGHT_ALIGN) (ALIGN) append_item + (&Top edge\tCtrl+Num 8) (UP_ALIGN) (ALIGN) append_item + (&Bottom edge\tCtrl+Num 2) (DOWN_ALIGN) (ALIGN) append_item + (Left &upper corner\tCtrl+Num 7) (LEFT_UP_ALIGN) (ALIGN) append_item + (Right upp&er corner\tCtrl+Num 9) (RIGHT_UP_ALIGN) (ALIGN) append_item + (Le&ft bottom corner\tCtrl+Num 1) (LEFT_DOWN_ALIGN) (ALIGN) append_item + (Right bottom &corner\tCtrl+Num 3) (RIGHT_DOWN_ALIGN) (ALIGN) append_item (&Rotate) (ROTATE) (TRANSFORM) append_submenu (90 &clockwise) (ROTATE_CLOCKWISE) (ROTATE) append_item (90 &anticlockwise\tCtrl+Tab) (ROTATE_ANTICLOCKWISE) (ROTATE) append_item @@ -2465,13 +2465,14 @@ cross2 init_cross /CONF_LANGUAGE_dlgbox { flush - (!PSV_DLGBOX: I {140,50}{Choose language}\n) print flush + (!PSV_DLGBOX: I {140,60}{Choose language}\n) print flush (!PSV_DLGBOX: T {R}{ALPHATEXT}{5,13,30,8}{Language}\n) print flush (!PSV_DLGBOX: L {N) print llanguage () eq {(0) print} if - llanguage (en) eq {(1) print} if - llanguage (pl) eq {(2) print} if - (|System default|English \(en\)|Polish \(pl\)|) print + llanguage (de) eq {(1) print} if + llanguage (en) eq {(2) print} if + llanguage (pl) eq {(3) print} if + (|System default|Deutsch \(de\)|English \(en\)|Polish \(pl\)|) print (}{LANGUAGELIST}{40,5,65,20}\n) print flush (!PSV_DLGBOX: T {C}{ALPHATEXT}{2,25,136,10}{Language will be changed after PS_View reset}\n) print flush (!PSV_DLGBOX: B {O}{OK}{25,35,35,12}{OK}\n) print flush @@ -3296,9 +3297,10 @@ end % MOUSECOMMANDS } def /LANGUAGELIST { - dup (100) eq {/llanguage () def} if - dup (010) eq {/llanguage (en) def} if - (001) eq {/llanguage (pl) def} if + dup (1000) eq {/llanguage () def} if + dup (0100) eq {/llanguage (de) def} if + dup (0010) eq {/llanguage (en) def} if + (0001) eq {/llanguage (pl) def} if (!PSV_CONFIG: S {PSV_Parameters}{language}{) print llanguage print (}\n) print flush } def -- cgit v1.2.3