From 19e6deec88e20852e89d1a8a65cbd57e3fbd5686 Mon Sep 17 00:00:00 2001 From: Karl Berry Date: Fri, 22 Feb 2013 22:56:10 +0000 Subject: pst-optexp (22feb13) git-svn-id: svn://tug.org/texlive/trunk@29201 c570f23f-e606-0410-a88d-b1316a301751 --- Master/texmf-dist/tex/latex/pst-optexp/pst-optexp.sty | 14 +++++++++----- 1 file changed, 9 insertions(+), 5 deletions(-) (limited to 'Master/texmf-dist/tex/latex') diff --git a/Master/texmf-dist/tex/latex/pst-optexp/pst-optexp.sty b/Master/texmf-dist/tex/latex/pst-optexp/pst-optexp.sty index 332ee17a450..b3d4416dad4 100644 --- a/Master/texmf-dist/tex/latex/pst-optexp/pst-optexp.sty +++ b/Master/texmf-dist/tex/latex/pst-optexp/pst-optexp.sty @@ -9,7 +9,7 @@ %% This is a generated file. %% %% Project: pst-optexp -%% Version: 3.4alpha (2013/02/03) +%% Version: 3.5 (2013/02/22) %% %% Copyright (C) 2007-2013 by Christoph Bersch %% @@ -31,7 +31,7 @@ %% \NeedsTeXFormat{LaTeX2e}[1999/12/01] \ProvidesPackage{pst-optexp} - [2013/02/03 v3.4 Optical experimental setups with PSTricks] + [2013/02/22 v3.5 Optical experimental setups with PSTricks] \RequirePackage{pstricks} \RequirePackage{pst-xkey} \RequirePackage{pst-node} @@ -874,8 +874,12 @@ {bandstop,bandpass,lowpass,highpass}% {\def\POE@key@filtertype{#1}}% {\PackageError{pst-optexp}{Unknown value '\val' for filtertype}} +\define@key[psset]{optexp}{filterangle}{% + \pst@checknum{#1}\POE@key@filterangle +} \newpsstyle{FilterStyle}{} \psset[optexp]{% + filterangle=0, filtersize=0.8, filtertype=bandpass }% @@ -2681,7 +2685,7 @@ \fi \ifPOE@fiberpresetout@ \ifPOE@fiberpresetout@top - \drawfiber@{FiberOut}[startnode=3]{\POE@key@compname}% + \drawfiber@{FiberOut1}[startnode=3]{\POE@key@compname}% {(#3)} \fi \ifPOE@fiberpresetout@bottom @@ -4165,7 +4169,7 @@ 90 add cos 0.2 \@sz mul mul}% }% \psframe[dimen=outer](! \@sz neg dup)(! \@sz dup) - \bgroup + \psrotate(\oenodeCenter{}){\POE@key@filterangle}{% \psset{style=FilterStyle}% \ifx\POE@key@filtertype\POE@str@filtertype@bandpass \psline(! -0.3 \@sz mul -0.65 \@sz mul)% @@ -4218,7 +4222,7 @@ \rput(0, 0){\filter@curve} \rput(! 0 -0.5 \@sz mul){\filter@curve} \fi\fi\fi\fi - \egroup + }% \ignorespaces}% \def\optamp@ref{% \POE@setref{/@@x \POE@key@optampwidth\space 0.5 mul def -- cgit v1.2.3