From: Jim Meyering <jim@meyering.net>
Date: Sat, 2 Jan 1999 19:28:31 +0000 (+0000)
Subject: (get_version): Adapt to use new interface to XARGMATCH.
X-Git-Url: https://pintos-os.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=c125570a0c27088f009b9d536ee28f9ba37c608b;p=pspp

(get_version): Adapt to use new interface to XARGMATCH.
---

diff --git a/lib/backupfile.c b/lib/backupfile.c
index 321a446045..b6a557df05 100644
--- a/lib/backupfile.c
+++ b/lib/backupfile.c
@@ -1,5 +1,5 @@
 /* backupfile.c -- make Emacs style backup file names
-   Copyright (C) 1990-1997, 1998 Free Software Foundation, Inc.
+   Copyright (C) 1990-1997, 1998, 1999 Free Software Foundation, Inc.
 
    This program is free software; you can redistribute it and/or modify
    it under the terms of the GNU General Public License as published by
@@ -228,8 +228,11 @@ static const enum backup_type backup_types[] =
 enum backup_type
 get_version (const char *version)
 {
+  enum backup_type type;
   if (version == 0 || *version == 0)
-    return numbered_existing;
-  return XARGCASEMATCH ("version control type", version,
-			backup_args, backup_types);
+    type = numbered_existing;
+  else
+    XARGMATCH (&type, "version control type", version,
+	       backup_args, backup_types, exit (2));
+  return type;
 }