From e627e55bc24355cf33fff2aceb704298085bc681 Mon Sep 17 00:00:00 2001
From: Teddy Wing
Date: Mon, 8 Oct 2018 17:20:06 +0200
Subject: Update the window with character, word, and paragraph counts

Turns out you have to call Objective-C methods, weird. Never seen that
syntax in AppleScript before. Neat though once you know.
---
 Word Count/AppDelegate.applescript | 15 ++++++++++++++-
 1 file changed, 14 insertions(+), 1 deletion(-)

(limited to 'Word Count')

diff --git a/Word Count/AppDelegate.applescript b/Word Count/AppDelegate.applescript
index e42da45..38a3c2e 100644
--- a/Word Count/AppDelegate.applescript	
+++ b/Word Count/AppDelegate.applescript	
@@ -11,9 +11,22 @@ script AppDelegate
 	
 	-- IBOutlets
 	property theWindow : missing value
+	property theCharacters : missing value
+	property theWords : missing value
+	property theParagraphs : missing value
 	
 	on applicationWillFinishLaunching_(aNotification)
-		-- Insert code here to initialize your application before any files are opened 
+		tell application "TextEdit"
+			set top_document to document 1
+
+			set l_chars to count characters of top_document
+			set l_words to count words of top_document
+			set l_paragraphs to count paragraphs of top_document
+		end tell
+
+		theCharacters's setStringValue_(l_chars)
+		theWords's setStringValue_(l_words)
+		theParagraphs's setStringValue_(l_paragraphs)
 	end applicationWillFinishLaunching_
 	
 	on applicationShouldTerminate_(sender)
-- 
cgit v1.2.3