# NOTE: Derived from lib/Env/PS1.pm.
# Changes made here will be lost when autosplit is run again.
# See AutoSplit.pm.
package Env::PS1;

#line 248 "lib/Env/PS1.pm (autosplit into blib/lib/auto/Env/PS1/S.al)"
sub S {
	$0 =~ m#([^/]*)$#;
	return $1 || '';
}

# end of Env::PS1::S
1;
