/macosx-10.9.5/emacs-92/emacs/lisp/term/ |
H A D | linux.el | 16 (let ((value (current-input-mode))) 18 (set-input-mode (nth 0 value) (nth 1 value) 'iso-latin-1 (nth 3 value))))
|
/macosx-10.9.5/emacs-92/emacs/lisp/calc/ |
H A D | calc-units.el | 309 (units (calc-var-value 'var-Units)) 319 (math-convert-units expr (nth pos units))) 322 (math-mul expr (nth pos units)))))))) 343 (error "Bad format in units expression: %s" (nth 1 uold))) 355 (error "Bad format in units expression: %s" (nth 2 units))) 358 (assq (nth 1 units) math-standard-units-systems)))) 362 (nth 1 std)))) 398 (error "Bad format in units expression: %s" (nth 2 uold))) 409 (error "Bad format in units expression: %s" (nth 2 unew))) 452 (let ((name (or (nth [all...] |
H A D | calc-forms.el | 83 (setq fmt (nth (string-to-number fmt) calc-standard-date-formats))) 87 (>= (setq arg (prefix-numeric-value arg)) 0) 173 (nth arg '(nil "year" "mnth" "day" "hour" "minu" 175 (list (nth arg '(nil calcFunc-year calcFunc-month 212 (error "Error in expression: %S" (nth 1 old))) 216 (error "Error in expression: %S" (nth 1 new))) 251 (list func (prefix-numeric-value arg)) 260 (prefix-numeric-value arg)) 267 (let ((h (math-normalize (nth 1 a))) 268 (m (math-normalize (nth [all...] |
H A D | calc-store.el | 1 ;;; calc-store.el --- value storage functions for Calc 43 (defvar calc-given-value-flag nil) 44 (defvar calc-given-value) 49 (let ((calc-given-value nil) 50 (calc-given-value-flag 1)) 62 (calc-store-value var (or calc-given-value (calc-top 1)) 63 "" calc-given-value-flag))) 70 (calc-store-value (car (car var)) (cdr (car var)) 117 (defun calc-store-value (va [all...] |
H A D | calc-map.el | 50 (concat (substring "apl" 0 (- 4 (length (nth 2 oper)))) 51 (nth 2 oper)) 53 (math-calcFunc-to-var (nth 1 oper)) 80 0 (- 4 (length (nth 2 oper)))) 81 (nth 2 oper)) 86 (cons (math-calcFunc-to-var (nth 1 oper)) 95 (math-calcFunc-to-var (nth 1 oper)) 115 (concat (substring "map" 0 (- 4 (length (nth 2 oper)))) 116 (nth 2 oper)) 118 (cons (math-calcFunc-to-var (nth [all...] |
H A D | calc-prog.el | 117 (let ((place (aref (nth 2 (nth 2 (symbol-function 'calc-do))) 15))) 119 (setq place (aref (nth 2 (nth 2 (symbol-function 'calc-do))) 27))) 177 (setq arglist (mapcar (function (lambda (x) (nth 1 x))) 179 form (nth (1- (length form)) form)) 331 (if (or (memq (nth 1 form) arglist) 334 (setq arglist (cons (nth 1 form) arglist))) 352 (memq (setq temp (or (cdr (assq (nth 1 f) '((nil . arg-nil) 354 (nth [all...] |
H A D | calc-ext.el | 633 (if (eq (car-safe (aref (nth 1 calc-mode-map) i)) 'keymap) 634 (aset (nth 1 calc-mode-map) i 635 (cons 'keymap (cons (cons ?\e (aref (nth 1 calc-mode-map) i)) 636 (cdr (aref (nth 1 calc-mode-map) i)))))) 644 (aset (nth 1 calc-alg-map) i 'calc-auto-algebraic-entry)) 646 (aset (nth 1 calc-alg-esc-map) i (aref (nth 1 calc-mode-map) i))) 736 math-composition-to-string math-stack-value-offset-fancy 823 math-nearly-zerop math-nearly-zerop-float math-nth-root 881 calc-store-value cal [all...] |
H A D | calc-embed.el | 111 ;;; 11 Evaluated value of the formula, or nil. 146 (cons (cons var (symbol-value var)) 176 (unless (equal (symbol-value (car mode)) (cdr mode)) 249 truncate-lines (nth 2 mode) 251 (use-local-map (nth 1 mode)) 288 (goto-char (nth 1 (aref info 8))) 289 (error (nth 2 (aref info 8))))) 349 (eq (car-safe (nth 1 (aref calc-embedded-info 8))) 386 (goto-char (nth 1 (aref info 8))) 387 (error (nth [all...] |
/macosx-10.9.5/emacs-92/emacs/lisp/ |
H A D | scroll-bar.el | 41 The value is a cons cell (PORTION . WHOLE) containing two integers 44 (nth 2 event)) 62 (vtype (nth 2 wsb)) 63 (cols (nth 1 wsb))) 86 (defun set-scroll-bar-mode-1 (ignore value) 87 (set-scroll-bar-mode value)) 89 (defun set-scroll-bar-mode (value) 90 "Set `scroll-bar-mode' to VALUE and put the new value into effect." 94 (setq scroll-bar-mode value) 124 ;; The default value fo [all...] |
H A D | descr-text.el | 67 'help-echo "mouse-2, RET: pretty print value in another buffer")))) 75 ;; Sort the properties by the size of their value. 80 (lambda (a b) (string< (prin1-to-string (nth 0 a) t) 81 (prin1-to-string (nth 0 b) t))))) 82 (let ((key (nth 0 elt)) 83 (value (nth 1 elt))) 88 (symbol-name value) 90 (describe-text-category ',value)) 94 (format "%S" value) [all...] |
H A D | double.el | 124 (append (make-list (1- (length (nth 1 entry))) 126 (nth 2 entry) 136 (let ((exp (nth 1 (assoc key double-map)))) 155 (vector (nth 0 entry)) 167 :set (lambda (symbol value) 168 (double-mode (if value 1 0))) 195 (<= (prefix-numeric-value arg) 0))
|
H A D | calculator.el | 126 "*Non-nil value means delete all redundant zero decimal digits. 127 If this value is not t, and not nil, redundant zeros are removed except 177 "*If non-nil, this is any value that can be used for 179 `calculator-copy'. If nil, then `calculator-displayer's normal value is 219 operators. It is probably not a good idea to modify this value with 293 `calculator' starts, it looks at the value of this variable, and if it 312 and evaluates to the function value - these variables are capital; 359 "Bound to t when a value should be added to the saved-list.") 368 "Internal value used by `calculator-eng-display'.") 371 "Internal value use [all...] |
H A D | wid-browse.el | 78 Entry to this mode calls the value of `widget-browse-mode-hook' 79 if that value is non-nil." 157 key value printer) 163 (setq key (nth 0 items) 164 value (nth 1 items) 169 (funcall printer widget key value) 190 The :value of the widget shuld be the widget to be browsed." 192 :value-create 'widget-browse-value [all...] |
H A D | font-lock.el | 246 :value ((t . nil)) 270 :value ((t . t)) 367 FORM is an expression, whose value should be a keyword element, evaluated when 385 FACENAME is an expression whose value is the face name to use. 402 \"\\\\\\=<foo\\\\\\=>\" discrete occurrences of \"foo\" in the value of the 405 the value of `font-lock-keyword-face'. 406 (\"fubar\" . fubar-face) Occurrences of \"fubar\" in the value of `fubar-face'. 408 occurrences of either \"foo\" or \"bar\" in the value 413 in the value of `fubar-face'. 432 discrete occurrences of \"anchor\" in the value o [all...] |
/macosx-10.9.5/emacs-92/emacs/lisp/emacs-lisp/ |
H A D | bytecomp.el | 49 ;; - removal of calls to side-effectless functions whose return-value 393 If the value is t, compilation displays the call graph when it finishes. 394 If the value is neither t nor nil, compilation asks you whether to display 512 (let ((v1 (or (get 'byte-code-vector 'tmp-compile-time-value) 513 (put 'byte-code-vector 'tmp-compile-time-value 515 (v2 (or (get 'byte-stack+-info 'tmp-compile-time-value) 516 (put 'byte-stack+-info 'tmp-compile-time-value 526 (get 'byte-code-vector 'tmp-compile-time-value) 528 (get 'byte-stack+-info 'tmp-compile-time-value)) 529 (put 'byte-code-vector 'tmp-compile-time-value ni [all...] |
H A D | lucid.el | 75 (nth arg 110 ((nth 3 state) 'string) 111 ((nth 4 state) 'comment))))) 118 (nth 0 (syntax-ppss (point))))) 147 (nth 1 (memq before overlays)) 150 (defun set-extent-property (extent prop value) 152 ;; with the same mouse-face value 155 (symbolp value) 156 (setq value (list value))) [all...] |
/macosx-10.9.5/WebCore-7537.78.1/inspector/front-end/ |
H A D | indexedDBViews.css | 52 .indexed-db-database-view .outline-disclosure .attribute-value { 87 .indexed-db-data-view .data-grid .data-container tr:nth-child(even) { 91 .indexed-db-data-view .data-grid .data-container tr:nth-child(odd) { 95 .indexed-db-data-view .data-grid .data-container tr:nth-last-child(1) { 99 .indexed-db-data-view .data-grid .data-container tr:nth-last-child(1) td { 107 .indexed-db-data-view .data-grid .data-container td.value-column, 113 .indexed-db-data-view .data-grid .data-container td.value-column div.primitive-value, 114 .indexed-db-data-view .data-grid .data-container td.key-column div.primitive-value, 115 .indexed-db-data-view .data-grid .data-container td.primaryKey-column div.primitive-value { [all...] |
/macosx-10.9.5/emacs-92/emacs/lisp/progmodes/ |
H A D | vhdl-mode.el | 154 (defun vhdl-custom-set (variable value &rest functions) 157 (custom-set-default variable value) 158 (set-default variable value)) 164 "Check that the value of WIDGET is a valid directory entry (i.e. ends with 166 (let ((val (widget-value widget))) 317 ;; **Error: LINE 49 *** No aggregate value is valid in this context. 334 ;; **Error: LINE 49 *** No aggregate value is valid in this context. 443 :set (lambda (variable value) 444 (vhdl-custom-set variable value 'vhdl-update-mode-menu)) 606 :set (lambda (variable value) [all...] |
/macosx-10.9.5/emacs-92/emacs/lisp/gnus/ |
H A D | smiley.el | 86 :set (lambda (symbol value) 87 (set-default symbol value) 107 (symbol-value smiley-regexp-alist) 114 (setq file (expand-file-name (concat (nth 2 elt) "." type) 144 (setq group (nth 1 entry) 145 image (nth 2 entry))
|
H A D | gnus-diary.el | 155 (nndiary-parse-schedule-value head (cadr elt) (car (cddr elt)))))) 300 (defvar gnus-diary-header-value-history nil 301 ;; History variable for header value prompting 343 value invalid) 350 (setq value (buffer-substring (point) (gnus-point-at-eol))) 351 (and (string-match "[ \t]*\\([^ \t]+\\)[ \t]*" value) 352 (setq value (match-string 1 value))) 354 (nndiary-parse-schedule-value value [all...] |
/macosx-10.9.5/emacs-92/emacs/lisp/calendar/ |
H A D | timeclock.el | 53 ;; workday in the modeline, you can either set the value of 71 ;; functions, or if you change the value of any of timeclock's 75 ;; display functions return the correct value. 128 the return value is nil, or equal to `timeclock-workday', nothing special 138 :set (lambda (symbol value) 139 (if value 142 (setq timeclock-ask-before-exiting value)) 159 left, set this variable to nil. Changing the value of this variable 163 :set (lambda (symbol value) 172 (or (and value [all...] |
/macosx-10.9.5/emacs-92/emacs/lisp/mail/ |
H A D | feedmail.el | 202 ;; return value from feedmail-run-the-queue 266 ;; burge@newvision.com (Shane Burgess); bumped up the default value of 302 (defmacro defcustom (var value doc &rest args) 303 `(defvar ,var ,value ,doc)))) 335 sending immediately. For any other non-nil value, prompt in both 431 If a positive integer value, leave (up to) that many lines of the 471 "*If non-nil and the email has no Sender: header, use this value. 475 NB: it makes no sense to use the value t since there is no sensible 489 value would be a string of a fully-qualified domain name form of your 511 "*If non-nil and the email has no From: header, use this value [all...] |
/macosx-10.9.5/emacs-92/emacs/leim/quail/ |
H A D | sisheng.el | 203 value 204 key-value-list 214 (setq value (vector (replace-match (nth i vowel-list) nil nil syllable))) 215 (push (list key value) key-value-list) 217 key-value-list))
|
/macosx-10.9.5/emacs-92/emacs/lisp/eshell/ |
H A D | em-ls.el | 75 :set (lambda (symbol value) 76 (if value 83 (setq eshell-ls-use-in-dired value)) 232 (if (nth 8 attrs) 233 (eq (aref (nth 8 attrs) 0) type))) 239 `(if (numberp (nth 2 ,attrs)) 240 (if (= (user-uid) (nth 2 ,attrs)) 241 (not (eq (aref (nth 8 ,attrs) ,index) ?-)) 243 (not (eq (aref (nth 8 ,attrs) 244 (+ ,index (if (member (nth [all...] |
H A D | esh-var.el | 33 variable value, a subcommand, or even the result of a Lisp form." 46 ;; Interval the value of an environment variable, or a Lisp variable 58 ;; Returns the length of the value of VARIABLE. This could also be 70 ;; Returns the value of an eshell subcommand. See the note above 75 ;; Return the 10th element of ANYVAR. If ANYVAR's value is a string, 107 ;; the value of the last command (t or nil, in the case of an external 168 ("1" (lambda (indices) (nth 0 eshell-command-arguments))) 169 ("2" (lambda (indices) (nth 1 eshell-command-arguments))) 170 ("3" (lambda (indices) (nth 2 eshell-command-arguments))) 171 ("4" (lambda (indices) (nth [all...] |