From: Ben Pfaff <blp@gnu.org>
Date: Mon, 25 Jul 2005 01:48:57 +0000 (+0000)
Subject: Read and ignore author field in portable files.
X-Git-Tag: v0.4.0~34
X-Git-Url: https://pintos-os.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=0f27235bdf621a87df0c9c2d9b01e9198eb7c42d;p=pspp-builds.git

Read and ignore author field in portable files.
---

diff --git a/src/ChangeLog b/src/ChangeLog
index 2505600b..f889b723 100644
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -1,3 +1,7 @@
+Sun Jul 24 18:47:37 2005  Ben Pfaff  <blp@gnu.org>
+
+	* pfm-read.c: (read_version_data) Read and ignore author field.
+
 Wed Jul  6 20:44:27 2005  Ben Pfaff  <blp@gnu.org>
 
 	* get.c: (mtf_processing) Don't assume that
diff --git a/src/pfm-read.c b/src/pfm-read.c
index 7967926e..0d5fbcc9 100644
--- a/src/pfm-read.c
+++ b/src/pfm-read.c
@@ -408,7 +408,7 @@ read_header (struct pfm_reader *r)
 static void
 read_version_data (struct pfm_reader *r, struct pfm_read_info *info)
 {
-  char *date, *time, *product, *subproduct;
+  char *date, *time, *product, *author, *subproduct;
   int i;
 
   /* Read file. */
@@ -417,6 +417,7 @@ read_version_data (struct pfm_reader *r, struct pfm_read_info *info)
   date = read_pool_string (r);
   time = read_pool_string (r);
   product = match (r, '1') ? read_pool_string (r) : (unsigned char *) "";
+  author = match (r, '2') ? read_pool_string (r) : (unsigned char *) "";
   subproduct
     = match (r, '3') ? read_pool_string (r) : (unsigned char *) "";