Pretty printer uses FQN even when parsing/typechecking is not ambiguous

[SystemFw]

foo  = [1, 2, 3] |> indexed

 I found and typechecked these definitions in ~/projects/unison/scratch.u. If you do
  an `add` or `update`, here's how your codebase would change:
  
    ⍟ These new definitions are ok to `add`:
    
      foo : [(Nat, Nat)]

> add
  ⍟ I've added these definitions:
  
    foo : [(Nat, Nat)]


  I added some default metadata.

> view foo

  foo : [(Nat, Nat)]
  foo = [1, 2, 3] |> base_2_9_1.data.List.indexed

This has been making my code very hard to read lately