Skip to content

Instantly share code, notes, and snippets.

View sabof's full-sized avatar

Evgkeni Sampelnikof sabof

  • London, United Kingdom
View GitHub Profile
@sabof
sabof / gist:8757983
Last active August 29, 2015 13:55
.emacs bootstrap
(set-language-environment "UTF-8")
(when (eq system-type 'windows-nt)
(setq default-file-name-coding-system 'cp1251))
(defun es-emacs-path (&optional path)
(concat (expand-file-name user-emacs-directory)
path))
(defun es-org-path (&optional path)
(concat (expand-file-name "~/org/") path))
@sabof
sabof / emacs-automount.el
Last active August 29, 2015 14:01
emacs-automount
;; -*- lexical-binding: t -*-
(require 'cl-lib)
(require 'dbus)
(cl-flet (( udisks-register-signal (&rest args)
(apply 'dbus-register-signal
:system "org.freedesktop.UDisks"
"/org/freedesktop/UDisks"
"org.freedesktop.UDisks"
args))