From: probe <probe>
Date: Tue, 1 Sep 1992 19:48:28 +0000 (+0000)
Subject: Abstracted the canonicalization of volume names (afs_vname)
X-Git-Tag: release77~415
X-Git-Url: http://andersk.mit.edu/gitweb/moira.git/commitdiff_plain/34ff2f023ff490011e1c46987dbbaff9c1e70dbe

Abstracted the canonicalization of volume names (afs_vname)
---

diff --git a/incremental/afs_create.pl b/incremental/afs_create.pl
index e5a33f85..0330d218 100644
--- a/incremental/afs_create.pl
+++ b/incremental/afs_create.pl
@@ -16,10 +16,8 @@ die "Usage: $0 locker type cell path user group\n" if (@ARGV != 6);
 
 # Lookup volume type
 ($c = $cell) =~ s/\./_/g;
-$vtype = eval "\$vtypes_$c{$type}";
-die "Cannot create $type volumes in $cell\n" unless $vtype;
-$vname = $vtype . "." . $locker;
-$vname =~ s/[^-A-Za-z0-9_.]//g;		# strip out illegal characters
+$vname = &afs_vname($locker, $type, $cell);
+die "Cannot create $type volumes in $cell\n" unless $vname;
 
 # Find free space
 ($asrv,$apart) = &afs_find($cell,$type,$quota);