|About 1,420 results (0.31 seconds)|
... (selection (anything-get-selection)) (selection-info (progn (setcdr source-info (
cons (let ((found (assoc selection (cdr source-info)))) (if (not found) ;; new entry ...
Mar 21, 2013 ... (cdr (assoc 'Definition list)) "\nSource: " (cdr (assoc 'DefinitionSource ... Results "\
n\n** Results:\n" (ddg-format-results (cdr (assoc 'Results list))) ...
... (incf (cdr (assoc from from-list))) (push (cons from 1) from-list)) (setq subject (
gnus-simplify-subject (mail-header-subject header))) (if (assoc subject subject-list
(save-excursion (let* ((b (diff-find-source-location)) (buff (car b)) (pos (car (car (
cdr (cdr b))))) (src (car (cdr (cdr (cdr b))))) (fn nil)) (set-buffer buff) (goto-char (+
... thing (intern thing))) (let ((bounds (bounds-of-thing-at-point thing))) (if bounds (
kill-region (car bounds) (cdr bounds))))) ;;;###autoload (defun copy-thing (thing) ...
Oct 13, 2011 ... type))))) file-1 (cs (cdr (assoc "coding-system" attrs))) str showcode) (unless (
string= (file-name-extension file) type) (setq file (concat file ".
Oct 13, 2005 ... (let ((tail buffer-undo-list) (prev nil)) (while (car tail) (when (integerp (car tail)) (let (
(pos (car tail))) (if (null prev) (setq buffer-undo-list (cdr tail)) ...
The car of each cons is called its key; the cdr is called its value. Different alists
have different kinds of keys and values. Typical key types include symbols and ...
(if (and erc-babel-enable (not (equal (substring msg 0 1) "/"))) (let* ((backend (
symbol-name (cdr (assoc erc-babel-backend babel-backends)))) (fetchfunc (
Aug 24, 2013 ... (let* ((elist mail-signature-alist) (found nil) (sind 0) (entry (car elist)) (header (car
entry)) (regex (car (cdr entry))) (file (car (cdr (cdr entry))))) ...