Merge pull request #13 from svenvc/master

Update to latest upstream Zinc

.github/workflows/CI.yml

@@ -7,7 +7,7 @@ jobs:
     runs-on: ubuntu-latest
     strategy:
       matrix:
-        smalltalk: [ Pharo64-11, Pharo64-10 , Pharo64-9.0 , Pharo64-8.0 , Pharo64-7.0 ]
+        smalltalk: [ Pharo64-12, Pharo64-11, Pharo64-10 , Pharo64-9.0 , Pharo64-8.0 , Pharo64-7.0 ]
     name: ${{ matrix.smalltalk }}
     steps:
       - uses: actions/checkout@v3

repository/Zinc-HTTP.package/ZnMimePart.class/instance/hasHeaders.st

@@ -1,4 +1,4 @@
 testing
 hasHeaders
 
-	^ headers isNotNil and: [ self headers isNotEmpty ]
+	^ headers isNotNil and: [ self headers isEmpty not ]

repository/Zinc-Resource-Meta-Core.package/ZnUrl.class/instance/parseFrom.defaultScheme..st

@@ -7,7 +7,7 @@ parseFrom: string defaultScheme: defaultScheme
 		ifTrue: [
 			self fragment: (self decodePercent: (string copyFrom: index + 1 to: end)).
 			end := index - 1 ].
-	(index := string indexOf: $?) > 0
+	((index := (string indexOf: $?)) between: 1 and: end)
 		ifTrue: [
 			self query: (self parseQueryFrom: (ReadStream on: string from: index + 1 to: end)).
 			end := index - 1 ].

repository/Zinc-Tests.package/ZnUrlTest.extension/instance/testFragmentWithQuestionMark.st

@@ -0,0 +1,9 @@
+*Zinc-Tests
+testFragmentWithQuestionMark
+
+	| urlString url |
+	urlString := 'http://www.example.com/#fragment?with?question?mark'.
+	url := urlString asUrl.
+	self assert: url segments isNil.
+	self deny: url hasQuery.
+	self assert: url asString equals: urlString