This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
set archivedTasks to "" | |
set hoursEntries to "" | |
tell application "TaskPaper" | |
tell front document | |
-- don't care which file your log entry came from? | |
-- comment the next line out | |
set archivedTasks to "## " & name & return | |
set hoursEntries to "## " & name & ": Hours" & return | |
repeat with _task in search with query "project != Archive and @done" | |
if entry type of _task is not project type then |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
try | |
set thePing to do shell script "/sbin/ping -o -c 5 www.google.com" | |
on error | |
set thePing to "error" | |
end try | |
tell application "FileMaker Pro Advanced" | |
if thePing is not "error" then | |
set cell "g_internet" to "true" | |
else |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
require 'net/https' | |
require 'uri' | |
require 'rubygems' | |
require 'json/pure' | |
# replace 9999999 with your instance id | |
@path = '/9999999/api/v1/projects.json' | |
@user = 'username' | |
@pass = 'password' |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
require 'net/https' | |
require 'uri' | |
# replace 9999999 with your instance id | |
@path = '/9999999/api/v1/projects.json' | |
@user = 'username' | |
@pass = 'password' | |
uri = URI.parse('https://basecamp.com') | |
http = Net::HTTP.new(uri.host, uri.port) |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
require 'net/https' | |
require 'uri' | |
require 'rubygems' | |
require 'json/pure' | |
@user = 'username' | |
@pass = 'password' | |
file = File.new("bc_proj.txt", "r") |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
require 'net/https' | |
require 'uri' | |
@path = '/api/v6/clients.json' | |
# insert API token in the user variable | |
@user = '' | |
@pass = 'api_token' | |
uri = URI.parse('https://www.toggl.com') |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
tell application "Evernote" | |
if (not (tag named "exported" exists)) then | |
make tag with properties {name:"exported"} | |
end if | |
set matches to find notes "tag:etf" | |
repeat with theNote in matches | |
set myTitle to title of theNote | |
set myTags to tags of theNote | |
set tagList to "" | |
repeat with theTag in myTags |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
tell application "Finder" | |
set folderList to "" | |
set mattersFolder to (((path to home folder as text) & "Google Drive:Matters:")) | |
set clientFolders to get name of folders of folder mattersFolder | |
repeat with theFolder in clientFolders | |
set folderList to folderList & theFolder & return | |
set thePath to mattersFolder & theFolder | |
set subFolders to get the name of folders of folder thePath | |
if (count of subFolders) is greater than 0 then | |
repeat with aFolder in subFolders |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
tell application "Finder" | |
set thePath to (path to desktop folder as text) | |
set clientFolders to get name of folders of folder thePath | |
repeat with theFolder in clientFolders | |
if the theFolder starts with "_" then exit repeat | |
set matterFolders to get folders of folder (thePath & theFolder as text) | |
repeat with aFolder in matterFolders | |
set clientName to theFolder as text | |
set the name of aFolder to theFolder & " - " & the name of aFolder | |
end repeat |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
tell application "Finder" | |
-- set theFile to "Macintosh HD:Users:[username]:Google Drive:Matters:Test Folder:" -- For testing | |
set myFile to do shell script "basename " & (the quoted form of (the POSIX path of theFile)) | |
-- check to see if it is worth starting OF | |
if myFile does not start with "_" and (theFile as string) ends with ":" then | |
set theDueDate to (current date) + 7 * days | |
OlderNewer