Skip to content

Instantly share code, notes, and snippets.

;;; -*- mode: lisp-interaction; syntax: elisp -*-
;; Time-stamp: <Jan 01 2018>
;; CharCode for Windows
(set-keyboard-coding-system 'japanese-shift-jis)
(set-buffer-file-coding-system 'japanese-cp932-dos)
(set-terminal-coding-system 'japanese-cp932-dos)
(set-file-name-coding-system 'japanese-cp932)
;; 標準IMEの設定
;;; -*- mode: emacs-lisp; syntax: elisp -*-
;; Time-stamp: <Jan 10 2018>
;; ------------------------------------------------------------------------
;; Keyset
(global-set-key "\C-h" 'backward-delete-char) ;C-h as BackSpace
(global-set-key "\M-?" 'help-for-help) ;M-? as help
(global-set-key "\C-q" 'dabbrev-expand)
;(global-set-key "\C-q" 'quoted-insert) ;C-q original
@itouhiro
itouhiro / RemoveSrcset.user.js
Last active November 4, 2015 13:30
RemoveSrcset.user.js : Remove URL in <img srcset="..." src="..."> for Firefox Addon 'Image Block' problem https://addons.mozilla.org/ja/firefox/addon/image-block/reviews/
// ==UserScript==
// @name RemoveSrcset
// @version 2015.11.05
// @namespace http://webaborn.herokuapp.com
// @description Remove URL in <img srcset="..." src="...">
// @include *
// ==/UserScript
(function () {
var removeSrcset = function(node){
var i, len, imgNode;
@itouhiro
itouhiro / csharp-setting.el
Last active December 23, 2015 14:49
csharp-setting.el: modify csharp-mode setting. copied almost all from http://blogs.msdn.com/b/dotnetinterop/archive/2008/04/14/dino-s-emacs-file.aspx
;; for Unity
;; set Windows EnvironmentalVariable EMACS_SERVER_FILE=Z:\home\.emacs.d\server\server
;; set Unity [Edit - Preference - External - Editor] C:\home\bin\gnupack\app\emacs\emacs\bin\emacsclientw.exe
(server-start)
;; csharp-mode
(autoload 'csharp-mode "csharp-mode" nil t)
(add-to-list 'auto-mode-alist '("\.cs$" . csharp-mode))
(modify-coding-system-alist 'file "\\.cs\\'" 'utf-8-with-signature-unix)
@itouhiro
itouhiro / emacs23.el
Last active December 23, 2015 14:39
put it in $HOME/.emacs.d/ some setting from gnupack
; -*- Mode: Emacs-Lisp ; Coding: utf-8 -*-
;; Time-stamp: <Apr 19 2013>
;; ------------------------------------------------------------------------
;; @ coding system
;; 日本語入力のための設定
;(set-keyboard-coding-system 'japanese-shift-jis)
(set-default-coding-systems 'utf-8-unix)
(set-buffer-file-coding-system 'utf-8-unix)
@itouhiro
itouhiro / ntemacs23.el
Last active December 23, 2015 14:39
put it in $HOME/.emacs.d/  このファイルを$HOME/.emacs.d/ に配置する copied some setting from gnupack  設定の多くはgnupackの.emacs.d/init.elからコピーさせてもらった some setting is in gnupack ini file  いくつかの設定(フォント・画面の行数など)はgnupack側でやっているのでここには書いてない
; -*- Mode: Emacs-Lisp ; Coding: utf-8 -*-;
;; Time-stamp: <Sep 11 2013>
(load "~/.emacs.d/emacs23.el")
;; ------------------------------------------------------------------------
;; @ coding system
;; 日本語入力のための設定
(set-keyboard-coding-system 'japanese-shift-jis)
@itouhiro
itouhiro / ntemacs24.el
Created September 21, 2013 13:01
put it in $HOME/.emacs.d/
; -*- Mode: Emacs-Lisp ; Coding: utf-8 -*-;
;; Time-stamp: <Mar 19 2013>
;; clipboard
(setq mouse-drag-copy-region t)
(load "~/.emacs.d/ntemacs23.el")
@itouhiro
itouhiro / init.el
Last active December 23, 2015 14:39
put it in $HOME/.emacs.d/
;;; -*- mode: lisp-interaction; syntax: elisp -*-
;; Time-stamp: <Sep 15 2013>
;; ------------------------------------------------------------------------
;; @ keyset
(global-set-key "\C-h" 'backward-delete-char) ;C-h as BackSpace
(global-set-key "\M-?" 'help-for-help) ;M-? as help
(global-set-key "\C-q" 'dabbrev-expand)
;(global-set-key "\C-q" 'quoted-insert) ;C-q original
package
{
import flash.display.Sprite;
import flash.events.Event;
import flash.events.MouseEvent; //←必要。FlashDevelopが勝手に追加してくれた。
[SWF(backgroundColor="0xfcfcfc", width="320",height="180", frameRate="15")] //←手動で追加した。
/**
* ...