amon2-setup.pl
でプロジェクト作成carton install
するheroku create --buildpack http://github.com/sugyan/heroku-buildpack-perl.git
git push
- template 編集 login
Amon2::Auth::Site::Github
cpanfile
に依存追記、carton install
- plugin 追加
- github app 作成
- config 設定
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
;; use "Show documentation" as 1st action | |
(eval-after-load "helm-go-package" | |
'(progn | |
(let* ((actions (helm-attr 'action helm-source-go-package)) | |
(godoc (nth 2 actions))) | |
(delete godoc actions) | |
(push godoc actions) | |
(helm-attrset 'action actions helm-source-go-package)))) |
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
#!/bin/sh | |
for fifo in $HOME/.weechat/weechat_fifo_*; do | |
echo '*/mute layout save' > $fifo | |
echo '*/mute save weechat' > $fifo | |
done | |
BUFFER=$(grep 'default.buffer' $HOME/.weechat/weechat.conf | cut -d'"' -f2 | percol | cut -d';' -f3) | |
if [ -n "$BUFFER" ]; then | |
for fifo in $HOME/.weechat/weechat_fifo_*; do |
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
function percol_select_directory() { | |
local tac | |
if which tac > /dev/null; then | |
tac="tac" | |
else | |
tac="tail -r" | |
fi | |
local dest=$(_z -r 2>&1 | eval $tac | percol --query "$LBUFFER" | awk '{ print $2 }') | |
if [ -n "${dest}" ]; then | |
cd ${dest} |
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
#!/bin/sh | |
if [ -n "${VPS_HOST}" ]; then | |
status=$(ssh ${VPS_HOST} 'curl "https://gist.githubusercontent.com/sugyan/11364796/raw/weechat_status_from_tmux.sh" 2> /dev/null | sh') | |
if [ -n "${status}" ]; then | |
echo display notification \"${status}\" with title \"weechat status\" | osascript | |
fi | |
fi |
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
#!/usr/bin/env perl | |
use strict; | |
use warnings; | |
use File::Find; | |
use File::Spec; | |
my %modules = (); | |
my %inc = map { $_ => $_ } map { File::Spec->canonpath($_) } @INC; |
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
#!/usr/bin/env perl | |
use strict; | |
use warnings; | |
use File::Find; | |
use File::Spec; | |
my %modules = (); | |
for my $path (grep { $_ ne '.' } @INC) { | |
find(+{ |
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
// logging activated app | |
var data = {}; | |
S.on('appActivated', function (event, app) { | |
var name = app.name(); | |
data[name] = data[name] || { | |
activated_count: 0, | |
activated_time: 0 | |
}; | |
data[name]['last_activated'] = new Date().getTime(); | |
data[name]['activated_count'] += 1; |
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
#!/usr/bin/env perl | |
use strict; | |
use warnings; | |
sub hoge { | |
my ($func, @args) = @_; | |
$func->(@args); | |
} | |
hoge(sub { |
画像表示の方法が変わったため画像を保存しにくくなったらしい、ということで。
以下をブラウザのブックマークとして保存し、各画像拡大ページで使うと、オリジナルの画像を別タブや別ウィンドウで開けるはずです。
あとは煮るなり焼くなり保存するなり好きにしてください。