diff options
author | joerg <joerg@FreeBSD.org> | 1996-08-20 20:37:47 +0000 |
---|---|---|
committer | joerg <joerg@FreeBSD.org> | 1996-08-20 20:37:47 +0000 |
commit | 614886b14345b7c5cac15a687107d6911b2467d7 (patch) | |
tree | 3f460e35aab19c1e561e06c0b424014828f7d4a4 | |
parent | 938f39425a29a53c4ffae0bc2f724b856b471c09 (diff) | |
download | FreeBSD-src-614886b14345b7c5cac15a687107d6911b2467d7.zip FreeBSD-src-614886b14345b7c5cac15a687107d6911b2467d7.tar.gz |
Ensure at least one space between the module name and the module path.
Detected by: asami
-rw-r--r-- | gnu/usr.bin/cvs/contrib/easy-import.pl | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/gnu/usr.bin/cvs/contrib/easy-import.pl b/gnu/usr.bin/cvs/contrib/easy-import.pl index 68d7027..7874842 100644 --- a/gnu/usr.bin/cvs/contrib/easy-import.pl +++ b/gnu/usr.bin/cvs/contrib/easy-import.pl @@ -8,7 +8,7 @@ # # Written by Jörg Wunsch, 95/03/07, and placed in the public domain. # -# $Id: easy-import.pl,v 1.6 1996/04/07 10:22:37 joerg Exp $ +# $Id: easy-import.pl,v 1.7 1996/04/28 12:32:43 joerg Exp $ require "complete.pl"; require "getopts.pl"; @@ -22,7 +22,7 @@ sub scan_opts $dont_do_it = "-n" if $opt_n; if($opt_v) { - print STDERR '$Source: /home/ncvs/src/gnu/usr.bin/cvs/contrib/easy-import.pl,v $ $Revision: 1.6 $' . "\n"; # 'emacs kludge + print STDERR '$Source: /home/ncvs/src/gnu/usr.bin/cvs/contrib/easy-import.pl,v $ $Revision: 1.7 $' . "\n"; # 'emacs kludge exit 0; } die "usage: $0 [-v] [-n] [moduledir]\n" . @@ -364,7 +364,7 @@ if (!$branchimport) { print "${so}Inserting new module...${se}\n"; open(ED, "|ed modules/modules") || die "${us}Cannot start ed${ue}\n"; - print(ED "${cmd}${modname}" . ' ' x (16 - length($modname)) . + print(ED "${cmd}${modname} " . ' ' x (15 - length($modname)) . "$area/${modpath}\n.\nw\nq\n"); close(ED); |