Actually I'm more of a fan of bar<-foo because you can line them up like:
(bar<-foo (foo<-baz (baz<-quux thing)))
instead of: (foo->bar (baz->foo (quux->baz thing)))