X-Git-Url: https://git.madduck.net/etc/zsh.git/blobdiff_plain/e7224a09f84f5983b9ca5254ab41adc867e32bcf..e45b0db3d66ca9e041622db3d801d026fb4d3724:/.zsh/func/TS

diff --git a/.zsh/func/TS b/.zsh/func/TS
index 19d2237..3075561 100755
--- a/.zsh/func/TS
+++ b/.zsh/func/TS
@@ -4,7 +4,7 @@
 #
 # a convenient way to create an environment for collaborative testing
 #
-# Copyright © 1994–2008 martin f. krafft <madduck@madduck.net>
+# Copyright © 1994–2017 martin f. krafft <madduck@madduck.net>
 # Released under the terms of the Artistic Licence 2.0
 #
 # Source repository: http://git.madduck.net/v/etc/zsh.git
@@ -13,8 +13,10 @@
 local topic filename ret
 topic="${(j:_:)@}"
 filename="${TMPDIR:-/tmp}/script.${topic:-$LOGNAME}.$$.$(date +%Y%m%d.%H%M)"
-PS1="%# " script -c "zsh -f" -f -q "$filename"
+echo "I: writing typescript to $filename ..." >&2
+PS1="
+%# " PS2= RPS1= script -c "zsh -f" -f -q "$filename"
 ret=$?
-echo "$filename"
+echo "I: typescript is in $filename ."
 return $ret
 exit $ret