From bed8add2f538d29be58d2ead0ce0581b4b1a5ef2 Mon Sep 17 00:00:00 2001
From: Cyril Ferlicot <c.ferlicot-delbecque@etudiant.univ-lille1.fr>
Date: Sat, 24 Sep 2016 17:32:35 +0200
Subject: [PATCH] Add smalltalk samples

(Issue: https://github.com/github/linguist/issues/3244)
---
 samples/Smalltalk/baselineDependency.st      |  8 ++++++++
 samples/Smalltalk/categories.st              |  8 ++++++++
 samples/Smalltalk/renderSeasideExampleOn..st |  9 +++++++++
 samples/Smalltalk/scriptWithPragma.st        | 11 +++++++++++
 samples/Smalltalk/smallMethod.st             |  3 +++
 5 files changed, 39 insertions(+)
 create mode 100644 samples/Smalltalk/baselineDependency.st
 create mode 100644 samples/Smalltalk/categories.st
 create mode 100644 samples/Smalltalk/renderSeasideExampleOn..st
 create mode 100644 samples/Smalltalk/scriptWithPragma.st
 create mode 100644 samples/Smalltalk/smallMethod.st

diff --git a/samples/Smalltalk/baselineDependency.st b/samples/Smalltalk/baselineDependency.st
new file mode 100644
index 00000000..0830bb81
--- /dev/null
+++ b/samples/Smalltalk/baselineDependency.st
@@ -0,0 +1,8 @@
+dependencies
+neoJSON: spec
+	spec
+		configuration: 'NeoJSON'
+		with: [ spec
+				className: 'ConfigurationOfNeoJSON';
+				version: #stable;
+				repository: 'http://smalltalkhub.com/mc/SvenVanCaekenberghe/Neo/main' ]
\ No newline at end of file
diff --git a/samples/Smalltalk/categories.st b/samples/Smalltalk/categories.st
new file mode 100644
index 00000000..680c6662
--- /dev/null
+++ b/samples/Smalltalk/categories.st
@@ -0,0 +1,8 @@
+SystemOrganization addCategory: #ChartJs!
+SystemOrganization addCategory: 'ChartJs-Component'!
+SystemOrganization addCategory: 'ChartJs-Demo'!
+SystemOrganization addCategory: 'ChartJs-Exception'!
+SystemOrganization addCategory: 'ChartJs-Library'!
+SystemOrganization addCategory: 'ChartJs-Model'!
+SystemOrganization addCategory: 'ChartJs-Style'!
+SystemOrganization addCategory: 'ChartJs-Types'!
diff --git a/samples/Smalltalk/renderSeasideExampleOn..st b/samples/Smalltalk/renderSeasideExampleOn..st
new file mode 100644
index 00000000..a5427572
--- /dev/null
+++ b/samples/Smalltalk/renderSeasideExampleOn..st
@@ -0,0 +1,9 @@
+rendering
+renderTitleId: divId on: html
+	^ html div
+		id: #title , divId;
+		class: #aClass;
+		with: [ 
+					html heading
+						level3;
+						with: self data title ]
\ No newline at end of file
diff --git a/samples/Smalltalk/scriptWithPragma.st b/samples/Smalltalk/scriptWithPragma.st
new file mode 100644
index 00000000..3f9dec81
--- /dev/null
+++ b/samples/Smalltalk/scriptWithPragma.st
@@ -0,0 +1,11 @@
+helpers
+installGitFileTree
+	"GitFileTree is the tool we will use to commit on GitHub."
+
+	<script>
+	Metacello new
+		baseline: 'FileTree';
+		repository:
+			'github://dalehenrich/filetree:pharo' , SystemVersion current dottedMajorMinor
+				, '_dev/repository';
+		load: 'Git'
\ No newline at end of file
diff --git a/samples/Smalltalk/smallMethod.st b/samples/Smalltalk/smallMethod.st
new file mode 100644
index 00000000..172af4d7
--- /dev/null
+++ b/samples/Smalltalk/smallMethod.st
@@ -0,0 +1,3 @@
+ChartJs
+dataFunction
+	^ 'bars'
\ No newline at end of file