Mercurial > forge
changeset 12398:5911a25e1d6b octave-forge
Allow write support for OCT/OOXML
| author | prnienhuis |
|---|---|
| date | Mon, 17 Mar 2014 22:16:47 +0000 |
| parents | 6f733e4a09bd |
| children | 6ecbd59d1b54 |
| files | main/io/inst/xlsopen.m |
| diffstat | 1 files changed, 7 insertions(+), 6 deletions(-) [+] |
line wrap: on
line diff
--- a/main/io/inst/xlsopen.m Mon Mar 17 22:16:19 2014 +0000 +++ b/main/io/inst/xlsopen.m Mon Mar 17 22:16:47 2014 +0000 @@ -1,4 +1,4 @@ -## Copyright (C) 2009,2010,2011,2012,2013 Philip Nienhuis +## Copyright (C) 2009,2010,2011,2012,2013,2014 Philip Nienhuis ## ## 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 @@ -139,7 +139,8 @@ ## 2013-12-28 Allow OOXML support for OpenXLS ## 2014-01-01 Add .csv to supported file extensions ## '' Add warning that UNO will write ODS f. unsupported file extensions -## '' Copyright string update +## '' Copyright string update +## 2014-02-02 Allow write support for OCT interface function [ xls ] = xlsopen (filename, xwrite=0, reqinterface=[]) @@ -260,10 +261,10 @@ if (ftype == 5) error ("There's only read support for gnumeric files"); endif - ## Catch attempts to write xlsx if only OCT interface is supported - if (xlsintf_cnt == 1 && xlsinterfaces.OCT) - error ("Only the OCT interface is present | requested, but that has only read support"); - endif +% ## Catch attempts to write xlsx if only OCT interface is supported +% if (xlsintf_cnt == 1 && xlsinterfaces.OCT) +% error ("Only the OCT interface is present | requested, but that has only read support"); +% endif fmode = 'r+b'; if (! has_suffix) ## Add .xls suffix to filename (all Excel versions can write this)