# HG changeset patch
# User John D
# Date 1479117973 18000
# Node ID a40ff07ce9878bfc235276369f7a443905d44fda
# Parent  63a1257dd4f107445872f11962a6beb4f301cd19
of-io: add patch file for error from 2.4.5 release of io package.

* src/of-io-1-fixes.patch: new file

* dist-files.mk: add of-io-1-fixes.patch

diff -r 63a1257dd4f1 -r a40ff07ce987 dist-files.mk
--- a/dist-files.mk	Sun Nov 13 09:59:42 2016 -0500
+++ b/dist-files.mk	Mon Nov 14 05:06:13 2016 -0500
@@ -465,6 +465,7 @@
   of-image.mk \
   of-interval.mk \
   of-instrument-control.mk \
+  of-io-1-fixes.patch \
   of-io.mk \
   of-linear-algebra-1-cross-fixes.patch \
   of-linear-algebra.mk \
diff -r 63a1257dd4f1 -r a40ff07ce987 src/of-io-1-fixes.patch
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/src/of-io-1-fixes.patch	Mon Nov 14 05:06:13 2016 -0500
@@ -0,0 +1,12 @@
+diff -ur io-2.4.5.orig/inst/private/__OCT_xlsx2oct__.m io-2.4.5/inst/private/__OCT_xlsx2oct__.m
+--- orig/inst/private/__OCT_xlsx2oct__.m     2016-11-08 22:05:13.000000000 +0100
++++ src/inst/private/__OCT_xlsx2oct__.m      2016-11-12 21:43:52.076390219 +0100
+@@ -196,7 +196,7 @@
+         vals = ctext(vals);
+         ids = cellfun (@isempty, vals);
+         if (any (ids))
+-          vals {find (ids)} = "";
++          vals(ids) = {""};
+         endif
+         ## Cell addresses
+         valraws = cell2mat (regexp (rawdata, '<c r="(\w+)"(?: s="\d+")? t="s"><v(?:.*?)>\d+</v>', "tokens"));