Take only second argument for run_{cd,edit,mkdir}
Make the behaviour of cd, edit and mkdir similar to cat and delete/rm and fail if some RDN's in the argument contain spaces without beeing quoted. --- shelldap | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) FossilOrigin-Name: f42d5c35c901e515ae774e087fd2cc77766a7e17adc381aa5d83ffb70e9261d3
This commit is contained in:
parent
8fb90e1d31
commit
6e5ffd5d70
1 changed files with 3 additions and 3 deletions
6
shelldap
6
shelldap
|
|
@ -1013,7 +1013,7 @@ sub run_cat
|
||||||
sub run_cd
|
sub run_cd
|
||||||
{
|
{
|
||||||
my $self = shift;
|
my $self = shift;
|
||||||
my $newbase = join ' ', @_;
|
my $newbase = shift;
|
||||||
|
|
||||||
# convert given path to a DN
|
# convert given path to a DN
|
||||||
$newbase = $self->path_to_dn( $newbase );
|
$newbase = $self->path_to_dn( $newbase );
|
||||||
|
|
@ -1225,7 +1225,7 @@ sub run_delete
|
||||||
sub run_edit
|
sub run_edit
|
||||||
{
|
{
|
||||||
my $self = shift;
|
my $self = shift;
|
||||||
my $dn = join ' ', @_;
|
my $dn = shift;
|
||||||
|
|
||||||
unless ( $dn ) {
|
unless ( $dn ) {
|
||||||
print "No dn provided.\n";
|
print "No dn provided.\n";
|
||||||
|
|
@ -1569,7 +1569,7 @@ sub run_list
|
||||||
sub run_mkdir
|
sub run_mkdir
|
||||||
{
|
{
|
||||||
my $self = shift;
|
my $self = shift;
|
||||||
my $dir = join ' ', @_;
|
my $dir = shift;
|
||||||
|
|
||||||
unless ( $dir ) {
|
unless ( $dir ) {
|
||||||
print "No 'directory' provided.\n";
|
print "No 'directory' provided.\n";
|
||||||
|
|
|
||||||
Loading…
Add table
Add a link
Reference in a new issue