… | … | ||
---|---|---|---|
3 | cf::map->register (qr{^~([^/]+)(/.*)}); | 3 | cf::map->register (qr{^~([^/]+)(/.*)}); |
4 | 4 | ||
5 | sub init { | 5 | sub init { |
6 | my ($self) = @_; | 6 | my ($self) = @_; |
7 | 7 | ||
8 | $self->{user} = $1; | 8 | $self->{user} = $1; |
9 | $self->{orig_path} = $2; | 9 | $self->{orig_path} = $2; |
10 | $self->{deny_reset} = 1; #d# for now | ||
10 | } | 11 | } |
11 | 12 | ||
12 | sub load_path { | 13 | sub load_path { |
13 | my ($self) = @_; | 14 | my ($self) = @_; |
14 | 15 |
– | Removed lines |
+ | Added lines |
< | Changed lines |
> | Changed lines |