3add6a2ac47186240a2d02a986ae22b6519d965f

Author
Matt Cable <wozz@wookie.net>
Committer
Matt Cable <wozz@wookie.net>
Date

Message

Portable perl dirpersiststore because 'tail -r' doesn't work everywhere.

Diff

 1diff --git a/plugins/dirpersist.plugin.zsh b/plugins/dirpersist.plugin.zsh
 2index b5e825bff5804852e0ee8224b4ed0d7724b3a2fc..6a2b289a2881abeeee97a47fb40dfffeb07c6077 100644
 3--- a/plugins/dirpersist.plugin.zsh
 4+++ b/plugins/dirpersist.plugin.zsh
 5@@ -19,9 +19,8 @@ dirpersistinstall () {
 6     fi
 7 }
 8 
 9-# FIXME solaris doesn't support tail -r
10 dirpersiststore () {
11-    dirs -p | tail -r | perl -ne 'chomp;s/([& ])/\\$1/g ;print "if [ -d $_ ]; then pushd -q $_; fi\n"' > $zdirstore
12+    dirs -p | perl -e 'foreach (reverse <STDIN>) {chomp;s/([& ])/\\$1/g ;print "if [ -d $_ ]; then pushd -q $_; fi\n"}' > $zdirstore
13 }
14 
15 dirpersistrestore () {