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
class Tab | |
constructor: -> | |
@$tabs = ($ '.tab') | |
@$sections = ($ '.section') | |
@_idx = 0 | |
current_tab: => | |
@$tabs.eq(@_idx) | |
current_section: => |
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
(require 'ert) | |
;; テストの登録->テストの実行という流れ | |
;; 1. M-x eval-buffer でテストの登録 | |
;; 2. M-x ert RET でテストの実行 | |
(ert-deftest test1 () | |
(should (eq (1+ 1) 2))) | |
;; (find-file "shibuya_el.org") |
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
// ==UserScript== | |
// @name Minibuffer | |
// @namespace http://white.s151.xrea.com/ | |
// @description Minibuffer | |
// @include * | |
// ==/UserScript== | |
var VERSION = "2009.12.06"; | |
var Class = function(){return function(){this.initialize.apply(this,arguments)}}; |
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
(defun popwin:popup-buffer-tail (&rest same-as-popwin:popup-buffer) | |
"Same as `popwin:popup-buffer' except that the buffer will be | |
`recenter'ed at the bottom." | |
(interactive "bPopup buffer:\n") | |
(let ((popup-win (apply 'popwin:popup-buffer same-as-popwin:popup-buffer))) | |
;;(save-excursion | |
(save-selected-window | |
(select-window popup-win) | |
(set-window-point popup-win (point-max)) | |
(recenter -2) |
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
;; (defun my-insert-pair (&optional arg open close fn) | |
;; (interactive "P") | |
;; (if (and (interactive-p) transient-mark-mode (not mark-active)) | |
;; (funcall fn) | |
;; (insert-pair)) | |
;; ) | |
(defun my-insert-pair-gen (func) | |
(lexical-let ((fn func)) | |
#'(lambda (&optional arg) | |
(interactive "P") |
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
(progn | |
(load-library "hideshow") | |
(add-to-list 'hs-special-modes-alist | |
'(ruby-mode | |
"class\\|module\\|def\\|if\\|unless\\|case\\|while\\|until\\|for\\|begin\\|do" "end" "#" | |
;;"\\(def\\|do\\|{\\)" "\\(end\\|end\\|}\\)" "#" | |
(lambda (arg) (ruby-end-of-block)) | |
;;ruby-move-to-block | |
nil)) | |
;;hoge |
NewerOlder