Lines Matching +refs:symbol +refs:plist
101 (symbol-value variable)))
105 (let ((tempvar (make-symbol "GnusStartBufferWindow"))
106 (w (make-symbol "w"))
107 (buf (make-symbol "buf")))
126 `(let ((symbol (intern ,string ,hashtable)))
127 (or (boundp symbol)
128 (set symbol nil))
129 symbol))
303 (defmacro gnus-local-set-keys (&rest plist)
305 `(gnus-define-keys-1 (current-local-map) ',plist))
307 (defmacro gnus-define-keys (keymap &rest plist)
309 `(gnus-define-keys-1 (quote ,keymap) (quote ,plist)))
311 (defmacro gnus-define-keys-safe (keymap &rest plist)
313 `(gnus-define-keys-1 (quote ,keymap) (quote ,plist) t))
319 (defmacro gnus-define-keymap (keymap &rest plist)
321 `(gnus-define-keys-1 ,keymap (quote ,plist)))
325 (defun gnus-define-keys-1 (keymap plist &optional safe)
329 (setq keymap (symbol-value keymap)))
334 (define-key (symbol-value (caddr keymap)) (cadr keymap) (car keymap))
335 (setq keymap (symbol-value (car keymap)))))
337 (while plist
338 (when (symbolp (setq key (pop plist)))
339 (setq key (symbol-value key)))
342 (define-key keymap key (pop plist))
343 (pop plist)))))
668 (define-key (symbol-value (intern (format "gnus-%s-mode-map" type)))
863 (let* ((temp-sym-map (mapcar (lambda (x) (list (make-symbol
864 (concat (symbol-name x)
877 (result (make-symbol "result-tmp")))
967 (symbol-value 'rmail-current-message))))
1106 (error "Not a symbol: %s" alist))
1149 (symbol-value sym))
1153 (intern (gnus-group-real-name (symbol-name sym))))
1154 (or (cdr (symbol-value sym))
1155 (car (symbol-value sym)))
1156 (car (symbol-value sym))))))
1164 (let ((buffer (make-symbol "output-buffer"))
1165 (size (make-symbol "output-buffer-size"))
1166 (leng (make-symbol "output-buffer-length"))
1167 (append (make-symbol "output-buffer-append")))
1232 ;; (`string-equal' uses symbol print names.)
1370 (if (symbol-value history)
1371 (concat prompt " (" (car (symbol-value history)) "): ")
1378 (car (symbol-value history))))
1406 (if (or (null (setq value (symbol-value variable)))
1536 (make-symbol (concat "head"
1540 (result (make-symbol "result"))
1541 (result-tail (make-symbol "result-tail")))
1587 (symbol-name system-type))