xnyhps

instance Eq MutterWord where
    a == b = case a `compare` b of { EQ -> True; _ -> False }

instance Ord MutterWord where
    compare EndOfLine EndOfLine = EQ
    compare EndOfLine _ = LT
    compare _ EndOfLine = GT
    compare (MutterWord (map toLower . filter isAlpha -> a)) (MutterWord (map toLower . filter isAlpha -> b)) = if (or $ map (\x -> a `elem` x && b `elem` x) [articles, pronouns]) then EQ else compare a b
           where articles = ["de", "het", "een"]
                 pronouns = ["hij", "zij"]

xnyhps

aqua:aquamarine:blue:blueviolet:brown:burlywood:cadetblue:chartreuse:chocolate:coral:cornflowerblue:crimson:cyan:darkblue:darkcyan:darkgoldenrod:darkgreen:darkgrey:darkkhaki:darkmagenta:darkolivegreen:darkorange:darkorchid:darkred:darksalmon:darkseagreen:darkslateblue:darkslategrey:darkturquoise:darkviolet:deeppink:deepskyblue:dimgrey:dodgerblue:firebrick:forestgreen:fuchsia:gold:goldenrod:green:greenyellow:grey:hotpink:indianred:indigo:lawngreen:lightblue:lightcoral:lightgreen:lightgrey:lightpink:lightsalmon:lightseagreen:lightskyblue:lightslategrey:lightsteelblue:lime:limegreen:magenta:maroon:mediumaquamarine:mediumblue:mediumorchid:mediumpurple:mediumseagreen:mediumslateblue:mediumspringgreen:mediumturquoise:mediumvioletred:midnightblue:navy:olive:olivedrab:orange:orangered:orchid:palegreen:paleturquoise:palevioletred:peru:pink:plum:powderblue:purple:red:rosybrown:royalblue:saddlebrown:salmon:sandybrown:seagreen:sienna:silver:skyblue:slateblue:slategrey:springgreen:steelblue:tan:teal:thistle:tomato:turquoi

xnyhps

require "luarocks.loader"
require "lsqlite3"
require "luaxml"
require "posix"

-- CREATE TABLE chat_list (_id INTEGER PRIMARY KEY AUTOINCREMENT, key_remote_jid TEXT UNIQUE, message_table_id INTEGER);
-- CREATE TABLE messages (_id INTEGER PRIMARY KEY AUTOINCREMENT, key_remote_jid TEXT NOT NULL, key_from_me INTEGER, key_id TEXT NOT NULL, status INTEGER, needs_push INTEGER, data TEXT, timestamp INTEGER, media_url TEXT, media_mime_type TEXT, media_wa_type TEXT, media_size INTEGER, media_name TEXT, latitude REAL, longitude REAL, thumb_image TEXT, remote_resource TEXT, received_timestamp INTEGER, send_timestamp INTEGER, receipt_server_timestamp INTEGER, receipt_device_timestamp INTEGER, raw_data BLOB);
-- CREATE UNIQUE INDEX messages_key_index on messages (key_remote_jid, key_from_me, key_id);

local self = "YOURPHONENUMBERHERE@s.whatsapp.net";

xnyhps

@"aqua", @"aquamarine", @"blue", @"blueviolet", @"brown", @"burlywood", @"cadetblue", @"chartreuse", @"chocolate", @"coral", @"cornflowerblue", @"crimson", @"cyan", @"darkblue", @"darkcyan", @"darkgoldenrod", @"darkgreen", @"darkgrey", @"darkkhaki", @"darkmagenta", @"darkolivegreen", @"darkorange", @"darkorchid", @"darkred", @"darksalmon", @"darkseagreen", @"darkslateblue", @"darkslategrey", @"darkturquoise", @"darkviolet", @"deeppink", @"deepskyblue", @"dimgrey", @"dodgerblue", @"firebrick", @"forestgreen", @"fuchsia", @"gold", @"goldenrod", @"green", @"greenyellow", @"grey", @"hotpink", @"indianred", @"indigo", @"lawngreen", @"lightblue", @"lightcoral", @"lightgreen", @"lightgrey", @"lightpink", @"lightsalmon", @"lightseagreen", @"lightskyblue", @"lightslategrey", @"lightsteelblue", @"lime", @"limegreen", @"magenta", @"maroon", @"mediumaquamarine", @"mediumblue", @"mediumorchid", @"mediumpurple", @"mediumseagreen", @"mediumslateblue", @"mediumspringgreen", @"mediumturquoise", @"mediumvioletred", @"midnightb

xnyhps

<?xml version="1.0" encoding="UTF-8" ?>
<chat xmlns="http://purl.org/net/ulf/ns/0.4-02" account="xnyhps_" service="IRC" adiumversion="1.7hg" buildid="19f59503d22d">
<event type="windowOpened" sender="xnyhps_" time="2012-09-12T00:50:41+02:00"></event>
<status type="connected" time="2012-09-12T00:50:41+02:00"><div>You have connected</div></status<?xml version="1.0" encoding="UTF-8" ?>
<chat xmlns="http://purl.org/net/ulf/ns/0.4-02" account="xnyhps_" service="IRC" adiumversion="1.7hg" buildid="19f59503d22d">
<event type="windowOpened" sender="xnyhps_" time="2012-09-12T00:50:42+02:00"></event>
<message sender="frigg" time="2012-09-12T00:50:42+02:00"><div><span style="font-family: Helvetica; font-size: 12pt;">Received CTCP &apos;VERSION&apos; (to xnyhps_) from frigg</span></div></message></?xml>

xnyhps

=> ls -l /usr/lib/sasl2/
total 1632
-rw-r--r--  1 root  wheel     631 May 18  2009 apop.la
-rwxr-xr-x  1 root  wheel   76672 Apr 15  2011 apop.so
-rwxr-xr-x  1 root  wheel     636 May 18  2009 dhx.la
-rwxr-xr-x  1 root  wheel  440128 Apr 15  2011 dhx.so
-rw-r--r--  1 root  wheel     653 May 18  2009 digestmd5WebDAV.la
-rwxr-xr-x  1 root  wheel  173392 Apr 15  2011 digestmd5WebDAV.so
drwxr-xr-x  6 root  wheel     204 Jun  6 18:57 disabled
-rwxr-xr-x  1 root  wheel   76960 May 18  2009 libanonymous.2.so

xnyhps

=> ls -lR /usr/lib/sasl2/
total 1040
-rw-r--r--  1 root  wheel     631 Apr  5 16:03 apop.la
-rwxr-xr-x  1 root  wheel   52544 Apr  5 16:03 apop.so*
-rwxr-xr-x  1 root  wheel     636 Apr  5 16:03 dhx.la*
-rwxr-xr-x  1 root  wheel  277424 Apr  5 16:03 dhx.so*
-rw-r--r--  1 root  wheel     653 Apr  5 16:03 digestmd5WebDAV.la
-rwxr-xr-x  1 root  wheel  116448 Apr  5 16:03 digestmd5WebDAV.so*
drwxr-xr-x  4 root  wheel     136 May 25  2011 disabled/
-rwxr-xr-x  1 root  wheel   52976 Apr  5 16:03 libanonymous.2.so*

xnyhps

module:set_global();

local wrapclient = require "net.server".wrapclient;
local s2s_new_outgoing = require "core.s2smanager".new_outgoing;
local initialize_filters = require "util.filters".initialize;
local bit = require "bit32";
local st = require "util.stanza";
local portmanager = require "core.portmanager";

-- Configuration, todo: actual configuration

xnyhps

↔ cabal install haskell-src-exts-1.11.1                                                                                                                                                                                                                        (12:10:57 19-09)
Resolving dependencies...
Configuring directory-1.1.0.2...
Warning: Unknown extensions: NondecreasingIndentation
configure: WARNING: unrecognized options: --with-compiler
checking for gcc... gcc
checking whether the C compiler works... yes
checking for C compiler default output file name... a.out
checking for suffix of executables... 
checking whether we are cross compiling... no

xnyhps

diff -r ac9256ed67c2 Frameworks/AIUtilities Framework/Source/AILinkTrackingController.m
--- a/Frameworks/AIUtilities Framework/Source/AILinkTrackingController.m	Fri Oct 12 17:42:56 2012 +0200
+++ b/Frameworks/AIUtilities Framework/Source/AILinkTrackingController.m	Tue Oct 23 23:23:45 2012 +0200
@@ -414,4 +414,10 @@
     [[NSPasteboard generalPasteboard] declareTypes:[NSArray arrayWithObject:NSRTFPboardType] owner:nil];
     [[NSPasteboard generalPasteboard] setData:[copyString RTFFromRange:NSMakeRange(0,[copyString length]) documentAttributes:nil] forType:NSRTFPboardType];
 }
+
+- (void)setRestrictToMainWindow:(BOOL)inRestrictToMainWindow
+{