2shortplanks

{"version":"0.3.2","level":"debug","message":"app is ready","timestamp":"2017-01-12T21:07:16.209Z"}
{"hotkey":"alt+space","level":"verbose","message":"registering zazu hotkey","timestamp":"2017-01-12T21:07:16.255Z"}
{"level":"info","message":"Adding to win32 or darwin startup","timestamp":"2017-01-12T21:07:16.452Z"}
{"level":"verbose","message":"git clone [tinytacoteam/zazu-light-theme] has 3 attempts","timestamp":"2017-01-12T21:07:19.225Z"}
{"level":"verbose","message":"git clone [tinytacoteam/zazu-light-theme] success","timestamp":"2017-01-12T21:07:20.071Z"}
{"plugin":"tinytacoteam/zazu-light-theme","level":"verbose","message":"loading package: tinytacoteam/zazu-light-theme","timestamp":"2017-01-12T21:07:20.072Z"}
{"plugin":"tinytacoteam/zazu-light-theme","level":"info","message":"loading css for theme","timestamp":"2017-01-12T21:07:20.078Z"}
{"level":"verbose","message":"git clone [tinytacoteam/zazu-calculator] has 3 attempts","timestamp":"2017-01-12T21:07:20.094Z"}
{"level":"verbose","message":"git clone 

2shortplanks

Mark@travis:~/co/Test2-Harness-Renderer-TeamCity$ cat t/test-data/basic/simple-fail/input.st
use strict;
use warnings;

use Test::More;

ok 0, 'simple-fail-msg';

done_testing;
Mark@travis:~/co/Test2-Harness-Renderer-TeamCity$ cat TeamCitySerial t/test-data/basic/simple-fail/expected.txt

2shortplanks

Mark@travis:/tmp$ perl foo.t
# Seeded srand with seed '20170104' from local date.
ok 1 - arse
1..1
Mark@travis:/tmp$ T2_FORMATTER=EventStream perl foo.t
T2_FORMATTER: EventStream
T2_EVENT: {"message":"Seeded srand with seed '20170104' from local date.","__PACKAGE__":"Test2::Event::Note","trace":{"__PACKAGE__":"Test2::Util::Trace","frame":["Test2::Plugin::SRand","/opt/markperl/lib/site_perl/5.22.0/Test2/Plugin/SRand.pm","59","SRAND"],"tid":0,"pid":92868}}
T2_ENCODING: utf8
T2_EVENT: {"effective_pass":1,"pass":1,"__PACKAGE__":"Test2::Event::Ok","trace":{"frame":["main","foo.t",5,"Test2::Tools::Basic::ok"],"__PACKAGE__":"Test2::Util::Trace","tid":0,"pid":92868},"name":"arse"}
T2_EVENT: {"max":1,"__PACKAGE__":"Test2::Event::Plan","trace":{"tid":0,"pid":92868,"frame":["main","foo.t",6,"Test2::Tools::Basic::done_testing"],"__PACKAGE__":"Test2::Util::Trace"},"directive":""}

2shortplanks

OS X

• Bandwidth management
  • Have a low bandwidth mode
  • only apps that opt into the low bandwidth API are allowed internet access
  • such apps receive notifications of entering low bandwidth mode and would have to request access before being able to use internet
  • would allow Dropbox to, say, learn of new updates and create share links but not download files
• DnD
• option to prompt with a single notification each hour to question if DnD should be turned off

2shortplanks

• Offscreen swipe gestures when the keyboard is onscreen (swipe from left of screen, right of screen over the keyboard) to switch between keyboards (note right now these swipes do nothing) Keep existing button for switching as usual.
• Press and hold / 3D touch on icons on the control center to do more things. For example:
  • select wireless network
  • turn off bluetooh keyboards
  • turn on favorite alarm / timer
  • turn on/off low power mode
• Allow night mode in lower power mode (based on the fact that this is both when you're most likely to want to use it - at the end of the day - and on evidence that it doesn't consume any more power) 9.3.2 added this
• Provide a way to wipe a password protected device without a laptop, that you need an mac for this is stupid
• Third party Apple music apps (thus meaning I don't have to use the built in music app, I doubt very much they can improve it in a way I like) Provided by 9.3
• Safari improvments:

2shortplanks

I said I hated the code on http://imgur.com/gallery/ZM0lYhb/ and StillNotYouTube asked for a better explanation. So here it is

if (foo == bar) {
  return "foo is bar";
} else {
  return "foo is not bar";
}

Is bad form. I would like:

2shortplanks

#!/opt/markperl/bin/perl

use strict;
use warnings;

use Mojo::Template;
use Path::Class qw(file dir);
use Cwd qw(cwd);

my $dist_name = dir(cwd)->dir_list(-1);

2shortplanks

Mark@travis:~/tmp/nac$ ls  
MyClass.pm	MyConstants.pm	RoleA.pm	RoleB.pm
Mark@travis:~/tmp/nac$ cat MyConstants.pm 
package MyConstants;
use base qw(Exporter);

# this is fine
sub my_good_constant { 1 };
push @EXPORT_OK, qw(my_good_constant);

2shortplanks

MAIN SCRIPT:

#!/usr/bin/perl

use strict;
use warnings;

use File::Temp qw(tempfile);

my $commit = shift or die "You have to pass a commit";

2shortplanks

Mark@travis:~$ perl -V
Summary of my perl5 (revision 5 version 22 subversion 0) configuration:
   
  Platform:
    osname=darwin, osvers=14.4.0, archname=darwin-2level
    uname='darwin travis.local 14.4.0 darwin kernel version 14.4.0: thu may 28 11:35:04 pdt 2015; root:xnu-2782.30.5~1release_x86_64 x86_64 '
    config_args='-ds -e -Dprefix=/opt/markperl'
    hint=recommended, useposix=true, d_sigaction=define
    useithreads=undef, usemultiplicity=undef
    use64bitint=define, use64bitall=define, uselongdouble=undef