Imported Upstream version 2.17

[debian/cpmtools] / mkfs.cpm.c

diff --git a/mkfs.cpm.c b/mkfs.cpm.c
index 3e97a89a505ed5800475ede7b91aa982801265c4..0e0ac55c9da8eb32248ffce39e7b5c7a1c64b7a0 100644 (file)
--- a/mkfs.cpm.c
+++ b/mkfs.cpm.c
@@ -103,7 +103,7 @@ const char cmd[]="mkfs.cpm";
 int main(int argc, char *argv[]) /*{{{*/
 {
   char *image;
-  const char *format=FORMAT;
+  const char *format;
   int c,usage=0;
   struct cpmSuperBlock drive;
   struct cpmInode root;
@@ -112,6 +112,7 @@ int main(int argc, char *argv[]) /*{{{*/
   char *bootTracks;
   const char *boot[4]={(const char*)0,(const char*)0,(const char*)0,(const char*)0};
 
+  if (!(format=getenv("CPMTOOLSFMT"))) format=FORMAT;
   while ((c=getopt(argc,argv,"b:f:L:h?"))!=EOF) switch(c)
   {
     case 'b':