Sfoglia il codice sorgente

Use Package >> commit to commit package

Nicolas Petton 11 anni fa
parent
commit
2234d73f87
3 ha cambiato i file con 250 aggiunte e 268 eliminazioni
  1. 124 124
      js/IDE.deploy.js
  2. 124 124
      js/IDE.js
  3. 2 20
      st/IDE.st

File diff suppressed because it is too large
+ 124 - 124
js/IDE.deploy.js


File diff suppressed because it is too large
+ 124 - 124
js/IDE.js


+ 2 - 20
st/IDE.st

@@ -804,16 +804,8 @@ cancelChanges
 !
 
 commitPackage
-	selectedPackage ifNotNil: [ |package|
-		package := Package named: selectedPackage.
-		{ Exporter -> (package commitPathJs, '/', selectedPackage, '.js').
-			StrippedExporter -> (package commitPathJs, '/', selectedPackage, '.deploy.js').
-			ChunkExporter -> (package commitPathSt, '/', selectedPackage, '.st')
-		} do: [:commitStrategy| |fileContents|
-			fileContents := (commitStrategy key new exportPackage: selectedPackage).
-			self ajaxPutAt: commitStrategy value data: fileContents
-		]
-	]
+	selectedPackage ifNotNil: [
+		(Package named: selectedPackage) commit ]
 !
 
 compile
@@ -1052,16 +1044,6 @@ initialize
 	unsavedChanges := false
 ! !
 
-!Browser methodsFor: 'network'!
-
-ajaxPutAt: aURL data: aString
-	jQuery
-		ajax: aURL options: #{ 'type' -> 'PUT'.
-								'data' -> aString.
-								'contentType' -> 'text/plain;charset=UTF-8'.
-								'error' -> [:xhr | window alert: 'Commiting ' , aURL , ' failed with reason: "' , (xhr responseText) , '"'] }
-! !
-
 !Browser methodsFor: 'rendering'!
 
 renderBottomPanelOn: html

Some files were not shown because too many files changed in this diff