diff options
author | Joerg Wunsch <joerg@FreeBSD.org> | 1996-08-20 20:37:47 +0000 |
---|---|---|
committer | Joerg Wunsch <joerg@FreeBSD.org> | 1996-08-20 20:37:47 +0000 |
commit | 8048172dedd26ae7405642aff0291739aa54677b (patch) | |
tree | 3f460e35aab19c1e561e06c0b424014828f7d4a4 /gnu/usr.bin/cvs | |
parent | f99f7b462b4fda8c0f7c1590e4d8e429a7ed3c7e (diff) | |
download | src-test2-8048172dedd26ae7405642aff0291739aa54677b.tar.gz src-test2-8048172dedd26ae7405642aff0291739aa54677b.zip |
Notes
Diffstat (limited to 'gnu/usr.bin/cvs')
-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 68d702723017..7874842fa6f8 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); |