diff --git a/src/Squot.package/GitAssetLoader.class/class/for..st b/src/Squot.package/GitAssetLoader.class/class/for..st index a6bbb6d9a..bacf47f8c 100644 --- a/src/Squot.package/GitAssetLoader.class/class/for..st +++ b/src/Squot.package/GitAssetLoader.class/class/for..st @@ -1,3 +1,10 @@ instance creation for: aString - ^ GitStandaloneAssetLoader named: aString ifAbsent: [self forWorkingCopyNamed: aString] \ No newline at end of file + ^ GitNamedAssetLoader + named: aString + ifAbsent: [ + GitWorkingCopyAssetLoader + named: aString + ifAbsent: [ + self error: ('No project with the name {1} could be found.' + format: {aString printString})]] \ No newline at end of file diff --git a/src/Squot.package/GitAssetLoader.class/class/forWorkingCopyNamed..st b/src/Squot.package/GitAssetLoader.class/class/forWorkingCopyNamed..st deleted file mode 100644 index 4d3a0161c..000000000 --- a/src/Squot.package/GitAssetLoader.class/class/forWorkingCopyNamed..st +++ /dev/null @@ -1,3 +0,0 @@ -instance creation -forWorkingCopyNamed: aString - ^ self forWorkingCopy: (SqueakWorkingCopy named: aString) \ No newline at end of file diff --git a/src/Squot.package/GitAssetLoader.class/instance/assetAt..st b/src/Squot.package/GitAssetLoader.class/instance/assetAt..st index 763d59b30..4f88f3ff5 100644 --- a/src/Squot.package/GitAssetLoader.class/instance/assetAt..st +++ b/src/Squot.package/GitAssetLoader.class/instance/assetAt..st @@ -1,3 +1,3 @@ accessing assetAt: aPath - ^ self workingCopy materializedAt: aPath \ No newline at end of file + self subclassResponsibility. \ No newline at end of file diff --git a/src/Squot.package/GitAssetLoader.class/instance/assetFSPaths.st b/src/Squot.package/GitAssetLoader.class/instance/assetFSPaths.st index 1bc161aac..c96fc678b 100644 --- a/src/Squot.package/GitAssetLoader.class/instance/assetFSPaths.st +++ b/src/Squot.package/GitAssetLoader.class/instance/assetFSPaths.st @@ -1,3 +1,3 @@ accessing assetFSPaths - ^ self mappers collect: #path \ No newline at end of file + self subclassResponsibility. \ No newline at end of file diff --git a/src/Squot.package/GitAssetLoader.class/methodProperties.json b/src/Squot.package/GitAssetLoader.class/methodProperties.json index 4bedef6e0..5314a5551 100644 --- a/src/Squot.package/GitAssetLoader.class/methodProperties.json +++ b/src/Squot.package/GitAssetLoader.class/methodProperties.json @@ -1,12 +1,10 @@ { "class" : { - "for:" : "mad 1/9/2024 18:45", - "for:basePath:" : "mad 11/21/2023 14:27", - "forWorkingCopy:" : "mad 10/19/2023 12:17", - "forWorkingCopyNamed:" : "mad 1/9/2024 16:52" }, + "for:" : "mad 6/12/2024 16:32", + "for:basePath:" : "mad 11/21/2023 14:27" }, "instance" : { - "assetAt:" : "mad 10/19/2023 12:15", - "assetFSPaths" : "mad 12/14/2023 12:51", + "assetAt:" : "mad 6/12/2024 14:51", + "assetFSPaths" : "mad 6/12/2024 14:51", "assetPaths" : "mad 12/14/2023 12:51", "basePath" : "mad 10/19/2023 12:14", "basePath:" : "mad 11/21/2023 14:29", @@ -22,7 +20,4 @@ "loadPlaintext:" : "mad 12/8/2023 19:01", "loadSound:" : "mad 10/19/2023 13:58", "loadString:" : "mad 12/8/2023 19:02", - "mappers" : "mad 12/14/2023 12:50", - "nameToPath:" : "mad 11/21/2023 14:29", - "workingCopy" : "mad 10/19/2023 12:14", - "workingCopy:" : "mad 10/19/2023 12:14" } } + "nameToPath:" : "mad 11/21/2023 14:29" } } diff --git a/src/Squot.package/GitAssetLoader.class/properties.json b/src/Squot.package/GitAssetLoader.class/properties.json index bf822b5c2..387e0ce37 100644 --- a/src/Squot.package/GitAssetLoader.class/properties.json +++ b/src/Squot.package/GitAssetLoader.class/properties.json @@ -6,7 +6,6 @@ ], "commentStamp" : "", "instvars" : [ - "workingCopy", "basePath" ], "name" : "GitAssetLoader", "pools" : [ diff --git a/src/Squot.package/GitNamedAssetLoader.class/README.md b/src/Squot.package/GitNamedAssetLoader.class/README.md new file mode 100644 index 000000000..e69de29bb diff --git a/src/Squot.package/GitStandaloneAssetLoader.class/class/named.ifAbsent..st b/src/Squot.package/GitNamedAssetLoader.class/class/named.ifAbsent..st similarity index 100% rename from src/Squot.package/GitStandaloneAssetLoader.class/class/named.ifAbsent..st rename to src/Squot.package/GitNamedAssetLoader.class/class/named.ifAbsent..st diff --git a/src/Squot.package/GitStandaloneAssetLoader.class/class/newWithName..st b/src/Squot.package/GitNamedAssetLoader.class/class/newWithName..st similarity index 100% rename from src/Squot.package/GitStandaloneAssetLoader.class/class/newWithName..st rename to src/Squot.package/GitNamedAssetLoader.class/class/newWithName..st diff --git a/src/Squot.package/GitStandaloneAssetLoader.class/class/register..st b/src/Squot.package/GitNamedAssetLoader.class/class/register..st similarity index 100% rename from src/Squot.package/GitStandaloneAssetLoader.class/class/register..st rename to src/Squot.package/GitNamedAssetLoader.class/class/register..st diff --git a/src/Squot.package/GitStandaloneAssetLoader.class/class/registry..st b/src/Squot.package/GitNamedAssetLoader.class/class/registry..st similarity index 100% rename from src/Squot.package/GitStandaloneAssetLoader.class/class/registry..st rename to src/Squot.package/GitNamedAssetLoader.class/class/registry..st diff --git a/src/Squot.package/GitStandaloneAssetLoader.class/class/registry.st b/src/Squot.package/GitNamedAssetLoader.class/class/registry.st similarity index 100% rename from src/Squot.package/GitStandaloneAssetLoader.class/class/registry.st rename to src/Squot.package/GitNamedAssetLoader.class/class/registry.st diff --git a/src/Squot.package/GitStandaloneAssetLoader.class/instance/name..st b/src/Squot.package/GitNamedAssetLoader.class/instance/name..st similarity index 100% rename from src/Squot.package/GitStandaloneAssetLoader.class/instance/name..st rename to src/Squot.package/GitNamedAssetLoader.class/instance/name..st diff --git a/src/Squot.package/GitNamedAssetLoader.class/instance/name.st b/src/Squot.package/GitNamedAssetLoader.class/instance/name.st new file mode 100644 index 000000000..5db226379 --- /dev/null +++ b/src/Squot.package/GitNamedAssetLoader.class/instance/name.st @@ -0,0 +1,3 @@ +as yet unclassified +name + ^ name \ No newline at end of file diff --git a/src/Squot.package/GitStandaloneAssetLoader.class/instance/register.st b/src/Squot.package/GitNamedAssetLoader.class/instance/register.st similarity index 100% rename from src/Squot.package/GitStandaloneAssetLoader.class/instance/register.st rename to src/Squot.package/GitNamedAssetLoader.class/instance/register.st diff --git a/src/Squot.package/GitNamedAssetLoader.class/methodProperties.json b/src/Squot.package/GitNamedAssetLoader.class/methodProperties.json new file mode 100644 index 000000000..10c6c9dac --- /dev/null +++ b/src/Squot.package/GitNamedAssetLoader.class/methodProperties.json @@ -0,0 +1,11 @@ +{ + "class" : { + "named:ifAbsent:" : "mad 6/12/2024 14:54", + "newWithName:" : "mad 6/12/2024 14:55", + "register:" : "mad 6/12/2024 14:55", + "registry" : "mad 6/12/2024 14:55", + "registry:" : "mad 6/12/2024 14:55" }, + "instance" : { + "name" : "mad 6/12/2024 15:52", + "name:" : "mad 6/12/2024 15:52", + "register" : "mad 6/12/2024 14:55" } } diff --git a/src/Squot.package/GitNamedAssetLoader.class/properties.json b/src/Squot.package/GitNamedAssetLoader.class/properties.json new file mode 100644 index 000000000..d19c58082 --- /dev/null +++ b/src/Squot.package/GitNamedAssetLoader.class/properties.json @@ -0,0 +1,14 @@ +{ + "category" : "Squot-Mapper-Asset", + "classinstvars" : [ + ], + "classvars" : [ + "Registry" ], + "commentStamp" : "", + "instvars" : [ + "name" ], + "name" : "GitNamedAssetLoader", + "pools" : [ + ], + "super" : "GitAssetLoader", + "type" : "normal" } diff --git a/src/Squot.package/GitStandaloneAssetLoader.class/instance/name.st b/src/Squot.package/GitStandaloneAssetLoader.class/instance/name.st deleted file mode 100644 index 22077c208..000000000 --- a/src/Squot.package/GitStandaloneAssetLoader.class/instance/name.st +++ /dev/null @@ -1,3 +0,0 @@ -accessing -name - ^ name \ No newline at end of file diff --git a/src/Squot.package/GitStandaloneAssetLoader.class/methodProperties.json b/src/Squot.package/GitStandaloneAssetLoader.class/methodProperties.json index 300475761..178854061 100644 --- a/src/Squot.package/GitStandaloneAssetLoader.class/methodProperties.json +++ b/src/Squot.package/GitStandaloneAssetLoader.class/methodProperties.json @@ -1,19 +1,11 @@ { "class" : { "classDependencies" : "mad 1/11/2024 21:53", - "extensionMethodCategoryDependencies" : "mad 1/11/2024 22:45", - "named:ifAbsent:" : "mad 1/15/2024 12:03", - "newWithName:" : "mad 1/9/2024 19:06", - "register:" : "mad 1/9/2024 19:08", - "registry" : "mad 1/9/2024 19:07", - "registry:" : "mad 1/9/2024 19:07" }, + "extensionMethodCategoryDependencies" : "mad 1/11/2024 22:45" }, "instance" : { "assetAt:" : "mad 1/9/2024 20:26", "assetAt:put:" : "mad 1/9/2024 20:26", "assetFSPaths" : "mad 1/9/2024 16:50", "assets" : "mad 1/9/2024 16:49", "assets:" : "mad 1/9/2024 16:49", - "initialize" : "mad 1/9/2024 16:50", - "name" : "mad 1/9/2024 19:06", - "name:" : "mad 1/9/2024 19:06", - "register" : "mad 1/9/2024 19:06" } } + "initialize" : "mad 1/9/2024 16:50" } } diff --git a/src/Squot.package/GitStandaloneAssetLoader.class/properties.json b/src/Squot.package/GitStandaloneAssetLoader.class/properties.json index d69c1736a..82d6f15f4 100644 --- a/src/Squot.package/GitStandaloneAssetLoader.class/properties.json +++ b/src/Squot.package/GitStandaloneAssetLoader.class/properties.json @@ -3,13 +3,12 @@ "classinstvars" : [ ], "classvars" : [ - "Registry" ], + ], "commentStamp" : "", "instvars" : [ - "assets", - "name" ], + "assets" ], "name" : "GitStandaloneAssetLoader", "pools" : [ ], - "super" : "GitAssetLoader", + "super" : "GitNamedAssetLoader", "type" : "normal" } diff --git a/src/Squot.package/GitWorkingCopyAssetLoader.class/README.md b/src/Squot.package/GitWorkingCopyAssetLoader.class/README.md new file mode 100644 index 000000000..e69de29bb diff --git a/src/Squot.package/GitAssetLoader.class/class/forWorkingCopy..st b/src/Squot.package/GitWorkingCopyAssetLoader.class/class/forWorkingCopy..st similarity index 100% rename from src/Squot.package/GitAssetLoader.class/class/forWorkingCopy..st rename to src/Squot.package/GitWorkingCopyAssetLoader.class/class/forWorkingCopy..st diff --git a/src/Squot.package/GitWorkingCopyAssetLoader.class/class/named.ifAbsent..st b/src/Squot.package/GitWorkingCopyAssetLoader.class/class/named.ifAbsent..st new file mode 100644 index 000000000..a18ff8a5a --- /dev/null +++ b/src/Squot.package/GitWorkingCopyAssetLoader.class/class/named.ifAbsent..st @@ -0,0 +1,3 @@ +instance creation +named: aString ifAbsent: aBlock + ^ self forWorkingCopy: (SqueakWorkingCopy named: aString ifAbsent: [^ aBlock value]) \ No newline at end of file diff --git a/src/Squot.package/GitWorkingCopyAssetLoader.class/instance/assetAt..st b/src/Squot.package/GitWorkingCopyAssetLoader.class/instance/assetAt..st new file mode 100644 index 000000000..86bc33aed --- /dev/null +++ b/src/Squot.package/GitWorkingCopyAssetLoader.class/instance/assetAt..st @@ -0,0 +1,3 @@ +as yet unclassified +assetAt: aPath + ^ self workingCopy materializedAt: aPath \ No newline at end of file diff --git a/src/Squot.package/GitWorkingCopyAssetLoader.class/instance/assetFSPaths.st b/src/Squot.package/GitWorkingCopyAssetLoader.class/instance/assetFSPaths.st new file mode 100644 index 000000000..170178603 --- /dev/null +++ b/src/Squot.package/GitWorkingCopyAssetLoader.class/instance/assetFSPaths.st @@ -0,0 +1,3 @@ +as yet unclassified +assetFSPaths + ^ self mappers collect: #path \ No newline at end of file diff --git a/src/Squot.package/GitAssetLoader.class/instance/mappers.st b/src/Squot.package/GitWorkingCopyAssetLoader.class/instance/mappers.st similarity index 100% rename from src/Squot.package/GitAssetLoader.class/instance/mappers.st rename to src/Squot.package/GitWorkingCopyAssetLoader.class/instance/mappers.st diff --git a/src/Squot.package/GitAssetLoader.class/instance/workingCopy..st b/src/Squot.package/GitWorkingCopyAssetLoader.class/instance/workingCopy..st similarity index 100% rename from src/Squot.package/GitAssetLoader.class/instance/workingCopy..st rename to src/Squot.package/GitWorkingCopyAssetLoader.class/instance/workingCopy..st diff --git a/src/Squot.package/GitAssetLoader.class/instance/workingCopy.st b/src/Squot.package/GitWorkingCopyAssetLoader.class/instance/workingCopy.st similarity index 100% rename from src/Squot.package/GitAssetLoader.class/instance/workingCopy.st rename to src/Squot.package/GitWorkingCopyAssetLoader.class/instance/workingCopy.st diff --git a/src/Squot.package/GitWorkingCopyAssetLoader.class/methodProperties.json b/src/Squot.package/GitWorkingCopyAssetLoader.class/methodProperties.json new file mode 100644 index 000000000..edc435e65 --- /dev/null +++ b/src/Squot.package/GitWorkingCopyAssetLoader.class/methodProperties.json @@ -0,0 +1,10 @@ +{ + "class" : { + "forWorkingCopy:" : "mad 6/12/2024 15:38", + "named:ifAbsent:" : "mad 6/12/2024 15:38" }, + "instance" : { + "assetAt:" : "mad 6/12/2024 14:51", + "assetFSPaths" : "mad 6/12/2024 14:51", + "mappers" : "mad 6/12/2024 14:51", + "workingCopy" : "mad 6/12/2024 14:52", + "workingCopy:" : "mad 6/12/2024 14:52" } } diff --git a/src/Squot.package/GitWorkingCopyAssetLoader.class/properties.json b/src/Squot.package/GitWorkingCopyAssetLoader.class/properties.json new file mode 100644 index 000000000..1e2944d45 --- /dev/null +++ b/src/Squot.package/GitWorkingCopyAssetLoader.class/properties.json @@ -0,0 +1,14 @@ +{ + "category" : "Squot-Mapper-Asset", + "classinstvars" : [ + ], + "classvars" : [ + ], + "commentStamp" : "", + "instvars" : [ + "workingCopy" ], + "name" : "GitWorkingCopyAssetLoader", + "pools" : [ + ], + "super" : "GitAssetLoader", + "type" : "normal" } diff --git a/src/Squot.package/SqueakWorkingCopy.class/class/named..st b/src/Squot.package/SqueakWorkingCopy.class/class/named..st index 2e2f095c7..b81d63038 100644 --- a/src/Squot.package/SqueakWorkingCopy.class/class/named..st +++ b/src/Squot.package/SqueakWorkingCopy.class/class/named..st @@ -1,4 +1,4 @@ registering named: aString - ^ self registry at: aString ifAbsent: [ + ^ self named: aString ifAbsent: [ ^ self error: ('No project with the name ''{1}'' was registered.' format: {aString})] \ No newline at end of file diff --git a/src/Squot.package/SqueakWorkingCopy.class/class/named.ifAbsent..st b/src/Squot.package/SqueakWorkingCopy.class/class/named.ifAbsent..st new file mode 100644 index 000000000..f0bd7030c --- /dev/null +++ b/src/Squot.package/SqueakWorkingCopy.class/class/named.ifAbsent..st @@ -0,0 +1,3 @@ +registering +named: aString ifAbsent: aBlock + ^ self registry at: aString ifAbsent: aBlock \ No newline at end of file diff --git a/src/Squot.package/SqueakWorkingCopy.class/methodProperties.json b/src/Squot.package/SqueakWorkingCopy.class/methodProperties.json index 75f64ffbc..d45c26ecd 100644 --- a/src/Squot.package/SqueakWorkingCopy.class/methodProperties.json +++ b/src/Squot.package/SqueakWorkingCopy.class/methodProperties.json @@ -15,7 +15,8 @@ "lastImageHash" : "mad 11/28/2023 19:20", "lastImageHash:" : "mad 11/28/2023 19:24", "nameFromURL:" : "mad 4/10/2024 19:40", - "named:" : "mad 9/19/2023 12:04", + "named:" : "mad 6/12/2024 14:44", + "named:ifAbsent:" : "mad 6/12/2024 14:44", "newFromUserAndRegister" : "mad 10/22/2023 00:12", "onFSGitRepository:named:" : "mad 9/19/2023 11:53", "onFSReference:named:" : "mad 9/19/2023 11:53",