ooxml

Check-in [32d3627499]
Login

Many hyperlinks are disabled.
Use anonymous login to enable hyperlinks.

Overview
Comment:bug fix: docProps/app.xml sheet count was wrong
Downloads: Tarball | ZIP archive | SQL archive
Timelines: family | ancestors | descendants | both | trunk
Files: files | file ages | folders
SHA3-256: 32d36274998554881e669520358d85b5d22f683cda4718ea58a7d269fd98814b
User & Date: alex 2020-02-04 13:18:49
Context
2020-03-05
19:35
ignore "-globalstyle" in versions > 1.5; styles are from now on predefined via method "column" and can be overwritten in method "cell" check-in: 9fc2848c8f user: alex tags: trunk
2020-02-14
18:59
First version to remove "-globalstyle" from method "cell". Instead, the options of method "column" are taken as long as no local options for "-style", "-string" and/or "-nozero" are specified for "cell". check-in: 85d6ea0ef6 user: alex tags: coldefs
2020-02-04
13:18
bug fix: docProps/app.xml sheet count was wrong check-in: 32d3627499 user: alex tags: trunk
2020-01-08
21:06
change README check-in: a827a9d83c user: alex tags: trunk
Changes
Hide Diffs Unified Diffs Ignore Whitespace Patch

Changes to ooxml.tcl.

2708
2709
2710
2711
2712
2713
2714
2715
2716
2717
2718
2719
2720
2721
2722
      Tag_ScaleCrop { Text false }
      Tag_HeadingPairs {
	Tag_vt:vector size 2 baseType variant {
	  Tag_vt:variant {
	    Tag_vt:lpstr { Text [msgcat::mc Worksheets] }
	  }
	  Tag_vt:variant {
	    Tag_vt:i4 { Text 3 }
	  }
	}
      }
      Tag_TitlesOfParts {
	Tag_vt:vector size $obj(sheets) baseType lpstr {
	  for {set ws 1} {$ws <= $obj(sheets)} {incr ws} {
	    Tag_vt:lpstr {







|







2708
2709
2710
2711
2712
2713
2714
2715
2716
2717
2718
2719
2720
2721
2722
      Tag_ScaleCrop { Text false }
      Tag_HeadingPairs {
	Tag_vt:vector size 2 baseType variant {
	  Tag_vt:variant {
	    Tag_vt:lpstr { Text [msgcat::mc Worksheets] }
	  }
	  Tag_vt:variant {
	    Tag_vt:i4 { Text $obj(sheets) }
	  }
	}
      }
      Tag_TitlesOfParts {
	Tag_vt:vector size $obj(sheets) baseType lpstr {
	  for {set ws 1} {$ws <= $obj(sheets)} {incr ws} {
	    Tag_vt:lpstr {

Changes to tests/simple.test.

74
75
76
77
78
79
80





81
82
83
84
85
86
87

testConstraint appCheck $appDoc

test DocPropsApp-3.2 {Check Application -application} appCheck {
  $doc selectNodesNamespaces $appXmlNs
  $doc selectNodes string(/x:Properties/x:Application)
} {Tcl Test}





 

$doc delete


test DocPropsCore-4.1 {Parse xlsx/docProps/core.xml} {
  set fd [open xlsx/docProps/core.xml r]







>
>
>
>
>







74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92

testConstraint appCheck $appDoc

test DocPropsApp-3.2 {Check Application -application} appCheck {
  $doc selectNodesNamespaces $appXmlNs
  $doc selectNodes string(/x:Properties/x:Application)
} {Tcl Test}
 
test DocPropsApp-3.3 {Check Sheet Counter} appCheck {
  $doc selectNodesNamespaces $appXmlNs
  $doc selectNodes string(/x:Properties/x:HeadingPairs/vt:vector/vt:variant/vt:i4)
} $sheet
 

$doc delete


test DocPropsCore-4.1 {Parse xlsx/docProps/core.xml} {
  set fd [open xlsx/docProps/core.xml r]