sabof

;; -*- lexical-binding: t -*-

(require 'cl-lib)
(defun es-scrape-web-listing
    (start-url collect-function next-url-function done-function
     &optional pages-limit silent)
  "Retrieve a list of things from a multi-page web document.

START-URL is the location from which to start scraping.

calmyournerves

# make sure the following is installed:
# - Xcode Command Line Tools (xcode-select --install)
# - OpenSSL from homebrew (brew install openssl && brew link openssl --force)

# dependencies and preparations
brew update
brew install git ossp-uuid md5sha1sum coreutils pcre gnutls libidn gsasl pkg-config libxml2
brew link libxml2 --force
brew tap darinmorrison/haskell
brew install darinmorrison/haskell/cabal-install

Sodaware

(defun phing-call (target)
  "Call Phing's build.xml"
  
  ;; Ask for target to execute
  (interactive "MPhing Target: ")
  
  ;; Open a new *phing-compilation* buffer & kill the old one
  (let ((oldbuf (get-buffer "*phing-compilation*")))
    (if (not (null oldbuf))
        (kill-buffer "*phing-compilation*")))

yasuyk

(when (and (eq system-type 'darwin) (eq window-system nil))
  (defun open-os-x-terminal ()
    (shell-command "open -a /Applications/Utilities/Terminal.app"))
  (add-hook 'edit-server-start-hook 'open-os-x-terminal))

ShingoFukuyama

;; Region lines and then `M-x osx-say' to make OSX speak.

;; Adjust speak speed
(setq osx-say-speed 180)

;; Change voice
;; Kathy, Vicki, Victoria, Alex, Bruce, Fred
(setq osx-say-voice "Alex")
(setq osx-say-buffer "*osx say*")

10long

;;　geeknote ==============================================================
(defun geeknote-mode ()
  (interactive)
  (eshell-command "python ~/geeknote/geeknote.py settings --editor /Applications/Emacs.app/Contents/MacOS/bin/emacsclient")
  )

(defun geeknote-create (newnote)
  (interactive "sname: ")
  (eshell-command
   (format "python ~/geeknote/geeknote.py create --content WRITE --title %s" newnote))