Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP
Browse files

<root> is a bit confusing, only replace $HOME into ~

  • Loading branch information...
commit 00fe3a21403d46b1890d52fc52b1045569db7df8 1 parent e2e2ca7
@samoht authored
Showing with 2 additions and 5 deletions.
  1. +2 −5 src/core/opamFilename.ml
View
7 src/core/opamFilename.ml
@@ -284,12 +284,9 @@ let prettify_string s =
Some (Filename.concat short suffix)
else
None in
- match aux ~short:"<root>" ~prefix:!OpamGlobals.root_dir with
+ match aux ~short:"~" ~prefix:(OpamMisc.getenv "HOME") with
| Some p -> p
- | None ->
- match aux ~short:"~" ~prefix:(OpamMisc.getenv "HOME") with
- | Some p -> p
- | None -> s
+ | None -> s
let prettify_dir d =
prettify_string (Dir.to_string d)
Please sign in to comment.
Something went wrong with that request. Please try again.