Xu Chunyang xuchunyang

xuchunyang / 0_reuse_code.js

Created January 29, 2016 11:22

Here are some things you can do with Gists in GistBox.

	// Use Gists to store code you would like to remember later on
	console.log(window); // log the "window" object to the console

xuchunyang / gist:8bf709a5853814f77f66

Created October 20, 2015 06:22

tmp file http://jianguoyun.com/p/DdMWmRQQ0LUDGPG5Dg

xuchunyang / helm-simple-buffer.el

Created October 10, 2015 13:34

	(helm :sources (helm-build-sync-source "Buffers"
	:candidates (lambda () (helm-buffer-list))
	:filtered-candidate-transformer
	'(helm-skip-boring-buffers
	helm-buffers-sort-transformer)
	:volatile t)
	:buffer "helm my buffers")

xuchunyang / incf-at-point.el

Created October 4, 2015 05:25

Increment number at point by 1.

	(defun incf-at-point ()
	"Increment number at point by 1."
	(interactive)
	(let ((number (number-at-point))
	bounds beg end)
	(if number
	(progn
	(setq bounds (bounds-of-thing-at-point 'sexp))
	(setq beg (car bounds)
	end (cdr bounds))

xuchunyang / foo.el

Created October 3, 2015 13:43

Use mouse to select a window for file/buffer

	(let* ((ev (read-event "Select a window with mouse: " nil))
	(pos (when (consp ev) (nth 1 ev)))
	(wind (when pos (posn-window pos))))
	(message-box "%s - %s" (current-buffer) ev))

xuchunyang / swap-value-of-variables.el

Created September 7, 2015 07:40

Swap values of variables and Swap car and cdr of cons cell in Emacs Lisp

xuchunyang / helm-config-0x01.el

Created September 1, 2015 17:32

[helm] Hide mode line and minibuffer content

	(setq helm-echo-input-in-header-line t)
	;; Hide minibuffer when the above option is on.
	(add-hook 'helm-minibuffer-set-up-hook
	#'helm-hide-minibuffer-maybe)

	;; Don't use helm's own displaying mode line function
	(fset 'helm-display-mode-line #'ignore)

	(add-hook 'helm-after-initialize-hook
	(defun hide-mode-line-in-helm-buffer ()

xuchunyang / gist:103c4dc2fc31cc3b1b9b

Created August 19, 2015 11:29

Pick up a Emacs recent file to edit from the Command Line

	# Put it in your .zshrc or .bashrc
	function ef { sed -n 's/^ "$.$"/\1/p' ~/.emacs.d/recentf \| pick \| xargs $EDITOR }

xuchunyang / helm-001.el

Created July 28, 2015 07:14

	(defun show-major-mode-name-action (candidate)
	(with-current-buffer candidate
	(unless (eq major-mode 'messages-buffer-mode)
	(message "The major-mode name of buffer at the cursor is %S"
	major-mode))))

	(helm :sources (helm-build-sync-source "buffers"
	:candidates '("scratch" "Messages")
	:action #'show-major-mode-name-action))

xuchunyang / hello-tcl.tcl

Created June 17, 2015 15:25

	#!/usr/bin/env tclsh

	# hello-tcl.tcl

	# Make some variables for testing
	set name "Chunyang Xu"
	set age 22
	set mail [format "%s@%s" chunyang macports.org]
	set blog http://xuchunyang.me

	# Put it in your .zshrc or .bashrc
	function ef { sed -n 's/^ "\(.\)"/\1/p' ~/.emacs.d/recentf \| pick \| xargs $EDITOR }