Skip to content

Instantly share code, notes, and snippets.

Luke Skywalker
C-3PO
R2-D2
Darth Vader
Leia Organa
Owen Lars
Beru Whitesun lars
R5-D4
Biggs Darklighter
Obi-Wan Kenobi
;;; git-mode-line-dot.el --- Show a dot for git status in the mode line
(eval-when-compile (require 'cl))
(require 'vc-git)
(add-to-list 'vc-handled-backends 'Git)
(defvar git-mode-line-dot-state-mark-modeline t
"modeline mark display or not")
(defun git-mode-line-dot-update-modeline ()
@ymorimo
ymorimo / gist:b06449f3b242f0d29abc
Last active January 25, 2016 12:43 — forked from hvolkmer/gist:4020468
AppleScript to migrate from Things to Omnifocus
--------------------------------------------------
--------------------------------------------------
-- Import tasks from Things to OmniFocus
--------------------------------------------------
--------------------------------------------------
--
-- Script taken from: http://forums.omnigroup.com/showthread.php?t=14846&page=2
--
-- Added: creation date, due date, start date functionality
@ymorimo
ymorimo / KeySetting_Default.plist.diff
Last active January 17, 2016 01:29
/System/Library/Input Methods/JapaneseIM.app/Contents/Resources/KeySetting_Default.plist
diff --git a/KeySetting_Default.plist.orig b/KeySetting_Default.plist
index 7df2f81..1ac2d1f 100644
--- a/KeySetting_Default.plist.orig
+++ b/KeySetting_Default.plist
@@ -13,14 +13,14 @@
<key>command</key>
<string>direct_input</string>
<key>character</key>
- <string> </string>
+ <string> </string>
@ymorimo
ymorimo / emacs.rb
Created March 13, 2013 07:23
Homebrew Emacs 24.2 with inline patch
require 'formula'
class Emacs < Formula
homepage 'http://www.gnu.org/software/emacs/'
url 'http://ftpmirror.gnu.org/emacs/emacs-24.2.tar.bz2'
mirror 'http://ftp.gnu.org/pub/gnu/emacs/emacs-24.2.tar.bz2'
sha1 '38e8fbc9573b70a123358b155cf55c274b5a56cf'
option "cocoa", "Build a Cocoa version of emacs"
option "inline", "Apply inline-patch"
@ymorimo
ymorimo / tweets.php
Last active December 14, 2015 11:29
Twitter API 1.1 特定ユーザーの user_timeline 取るだけ
<?php
$consumer_key = 'CONSUMER_KEY';
$consumer_secret = 'CONSUMER_SECRET';
$access_token = 'ACCESS_TOKEN';
$access_token_secret = 'ACCESS_TOKEN_SECRET';
$screen_name = 'SCREEN_NAME';
function load_tweets() {
global $screen_name;
$filename = "$screen_name.json";
diff --git a/src/html.c b/src/html.c
index 17987fb..65415eb 100644
--- a/src/html.c
+++ b/src/html.c
@@ -952,8 +952,13 @@ void send_rss(request_rec *r, const mu_pack *const pack, const mu_config *const
ap_rvputs(r, "version=\"2.0\">\n"
" <channel>\n"
- " <title>", _("RSS Feed for "), ap_escape_html(r->pool, r->uri), "</title>\n"
- " <link>", NULL);
@ymorimo
ymorimo / rec_radiko.sh
Last active October 5, 2015 19:37 — forked from laiso/rec_radiko.sh
# Moved to https://github.com/ymorimo/rec_radiko
@ymorimo
ymorimo / amida.rb
Created June 2, 2012 05:29
#minatork01
#!/usr/bin/env ruby
cols = (ARGV[0] || 5).to_i - 1
rows = (ARGV[1] || 9).to_i
begin
table = (0...rows).map do |i|
(0...cols).map { rand(2) }.join
end
end until table.join =~ /1/
@ymorimo
ymorimo / gist:1132618
Created August 8, 2011 20:16
edit-server config
(when (require 'edit-server nil 'noerror)
(setq edit-server-new-frame nil)
(edit-server-start)
(setq my-edit-server-mode-alist '(("github.com" . markdown-mode) ("blogger.com" . html-mode)))
(add-hook 'edit-server-start-hook
(lambda ()
(let ((lst my-edit-server-mode-alist))
(while lst
(if (string-match (caar lst) (buffer-name))
(progn