|About 1,580 results (0.22 seconds)|
... xml) (xml-parse-region (point-min) (point-max)))) (post (car root)) (attrs (xml-
node-attributes post)) (time (cdr (assq 'time attrs))) (msg (car (xml-get-children
(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 (+
The first is called the car; the second is called the cdr. See also atom. cursor (text
cursor) – how it differs from the pointer (mouse pointer); its relation with point ...
[0-9]* <a" (car list-lines)) (progn (setq string (concat string (match-string 1 (car list-
lines)) " " (match-string 2 (car list-lines)) " " ) ) (if (string-match "<strong>\\(.
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)) ...
Oct 13, 2005 ... ... stream functions (defmacro cons-stream (a b) `(cons ,a (delay ,b))) (defun
stream-car (stream) (car stream)) (defun stream-cdr (stream) (force ...
(defun vcproj-extract-platforms (current-block) "Extract a list of platform from
CURRENT-BLOCK." (unless (eq (car current-block) 'Platforms) (error "Expected a
(let ((good '()) (bad '()) (records (if (not visible-records) (bbdb-records) (set-buffer
bbdb-buffer-name) (mapcar 'car bbdb-records)))) ;; Open .mailrc file (find-file ...
... thing (intern thing))) (let ((bounds (bounds-of-thing-at-point thing))) (if bounds (
kill-region (car bounds) (cdr bounds))))) ;;;###autoload (defun copy-thing (thing) ...
Aug 24, 2013 ... ... nil t) (let* ((capacity (car (read-from-string (match-string 1)))) (amps (car (read-
from-string (match-string 2)))) (current (car (read-from-string ...