--- teTeX-src-beta-20020530/texmf/tex/latex/graphics/dvips.def.orig	Sun Jun  3 21:06:19 2001
+++ teTeX-src-beta-20020530/texmf/tex/latex/graphics/dvips.def	Thu Aug  8 16:26:44 2002
@@ -129,11 +129,10 @@
  currentpoint translate \Grot@angle\space neg
  rotate neg exch neg exch translate}}
 \def\Grot@end{\special{ps: currentpoint grestore moveto}}
-\def\Gscale@start{\special{ps:  currentpoint currentpoint translate
+\def\Gscale@start{\special{ps: gsave currentpoint currentpoint translate
   \Gscale@x\space \Gscale@y\space scale neg exch neg exch translate}}
-\def\Gscale@end{\special{ps:  currentpoint currentpoint translate
-  1 \Gscale@x\space div 1 \Gscale@y\space div scale
-  neg exch neg exch translate}}
+\def\Gscale@end{\special{ps: currentpoint matrix currentmatrix transform
+  grestore matrix currentmatrix itransform moveto}}
 \def\Gin@PS@raw#1{\special{ps: #1}}
 \def\Gin@PS@restored#1{\special{" #1}}
 \def\Gin@PS@literal@header#1{\AtBeginDvi{\special{! #1}}}
