Newton, Philip wrote:
> So here's my attempt:
> 
> export PROMPT_COMMAND="perl -e 
> '@d=split/\//,qx(pwd);@d=(q(...),@d[-2,-1])if@d>3;
> chomp@d;\$\"=q(/);print+qq(\33]0;@d\7)'"

Oops, make that

export PROMPT_COMMAND="perl -e 
'@d=split/\//,qx(pwd);@d=(q(...),@d[-2,-1])if@d>3;
chomp@d;\$\"=q(/);print+qq(\e]0;@d\a)'"

, of course.

Cheers,
Philip
-- 
Philip Newton <[EMAIL PROTECTED]>
All opinions are my own, not my employer's.
If you're not part of the solution, you're part of the precipitate.
  • ... John Porter
  • ... Robert G. Werner
    • ... Craig S. Cottingham
      • ... Robert G. Werner
    • ... Paul Johnson
    • ... Abigail
      • ... Robert G. Werner
        • ... Dmitry Kohmanyuk Дмитрий Кохманюк
  • ... Newton, Philip
  • ... Newton, Philip
    • ... Simon Cozens
  • ... Newton, Philip
  • ... Andrew . Savige
  • ... Newton, Philip
    • ... Bart Lateur
  • ... Andrew . Savige
  • ... Pense, Joachim
  • ... Andrew . Savige
  • ... Andrew . Savige
  • ... Andrew . Savige

Reply via email to