The Tor Browser / file comparison
comparison: nsprpub/config/nfspwd.pl
nsprpub/config/nfspwd.pl
- changeset 0
- 6474c204b198
equal
deleted
inserted
replaced
| -1:000000000000 | 0:cf619e8dd2a1 |
|---|---|
| 1 #! perl | |
| 2 # | |
| 3 # This Source Code Form is subject to the terms of the Mozilla Public | |
| 4 # License, v. 2.0. If a copy of the MPL was not distributed with this | |
| 5 # file, You can obtain one at http://mozilla.org/MPL/2.0/. | |
| 6 | |
| 7 require "fastcwd.pl"; | |
| 8 | |
| 9 $_ = &fastcwd; | |
| 10 if (m@^/[uh]/@o || s@^/tmp_mnt/@/@o) { | |
| 11 print("$_\n"); | |
| 12 } elsif ((($user, $rest) = m@^/usr/people/(\w+)/(.*)@o) | |
| 13 && readlink("/u/$user") eq "/usr/people/$user") { | |
| 14 print("/u/$user/$rest\n"); | |
| 15 } else { | |
| 16 chop($host = `hostname`); | |
| 17 print("/h/$host$_\n"); | |
| 18 } |
