Skip to content

Instantly share code, notes, and snippets.

Sam Ritchie sritchie

Block or report user

Report or block sritchie

Hide content and notifications from this user.

Learn more about blocking users

Contact Support about this user’s behavior.

Learn more about reporting abuse

Report abuse
View GitHub Profile
View orgmode.el
;; Copyright (c) 2010 Charles Cave
;;
;; Permission is hereby granted, free of charge, to any person
;; obtaining a copy of this software and associated documentation
;; files (the "Software"), to deal in the Software without
;; restriction, including without limitation the rights to use,
;; copy, modify, merge, publish, distribute, sublicense, and/or sell
;; copies of the Software, and to permit persons to whom the
;; Software is furnished to do so, subject to the following
;; conditions:
View *Backtrace*
(let (ad-return-value) (follow-avoid-tail-recenter) (setq ad-return-value (ad-Orig-sit-for seconds nodisp obsolete)) ad-return-value)
ad-Orig-sit-for(0 nil nil)
(setq ad-return-value (ad-Orig-sit-for seconds nodisp obsolete))
(let (ad-return-value) (follow-avoid-tail-recenter) (setq ad-return-value (ad-Orig-sit-for seconds nodisp obsolete)) ad-return-value)
ad-Orig-sit-for(0 nil nil)
(setq ad-return-value (ad-Orig-sit-for seconds nodisp obsolete))
(let (ad-return-value) (follow-avoid-tail-recenter) (setq ad-return-value (ad-Orig-sit-for seconds nodisp obsolete)) ad-return-value)
ad-Orig-sit-for(0 nil nil)
sit-for(0)
isearch-lazy-highlight-new-loop()
View *Backtrace*
sit-for(0)
isearch-lazy-highlight-new-loop()
isearch-update()
isearch-mode(t nil nil nil)
isearch-forward(nil 1)
call-interactively(isearch-forward nil nil)
View error from isearch
Debugger entered--Lisp error: (error "Lisp nesting exceeds `max-lisp-eval-depth'")
(... a ton of times)
(setq ad-return-value (ad-Orig-sit-for seconds nodisp obsolete))
(let (ad-return-value) (follow-avoid-tail-recenter) (setq ad-return-value (ad-Orig-sit-for seconds nodisp obsolete)) ad-return-value)
ad-Orig-sit-for(0 nil nil)
sit-for(0)
isearch-lazy-highlight-new-loop()
isearch-update()
isearch-mode(t nil nil nil)
isearch-forward(nil 1)
View behaviour.el
(defadvice find-tag
(before discover-before-lookup)
(discover-corresponding-tags-file))
View *Help*
sit-for is a compiled Lisp function in `subr.el'.
(sit-for SECONDS &optional NODISP)
Perform redisplay, then wait for SECONDS seconds or until input is available.
SECONDS may be a floating-point value.
(On operating systems that do not support waiting for fractions of a
second, floating-point values are rounded down to the nearest integer.)
If optional arg NODISP is t, don't redisplay, just wait for input.
View follow.el
;; This prevents all packages that calls `sit-for' directly
;; to recenter tail windows.
(if follow-avoid-tail-recenter-p
(defadvice sit-for (before follow-sit-for activate)
"Adviced by Follow mode.
Avoid to recenter windows displaying only the end of a file as when
displaying a short file in two windows, using Follow mode."
(follow-avoid-tail-recenter)))
View test_helper.rb
def login_as(user)
session[:user_id] = users(user).id
end
def logout
sessions.delete :user_id
end
def setup
login_as :one if defined? session
View gist:618569
cd find: ~/*: No such file or directory
find: ~/Library/*: No such file or directory
find: ~/Documents/Projects/*: No such file or directory
View bashrc
# System-wide .bashrc file for interactive bash(1) shells.
if [ -z "$PS1" ]; then
return
fi
PS1='\h:\W \u\$ '
# Make bash check its window size after a process completes
shopt -s checkwinsize
You can’t perform that action at this time.