146 |
"Handle SWITCH of the form \"-switch n\"." |
"Handle SWITCH of the form \"-switch n\"." |
147 |
(let ((aelt (assoc switch command-line-x-option-alist))) |
(let ((aelt (assoc switch command-line-x-option-alist))) |
148 |
(if aelt |
(if aelt |
149 |
(push (cons (nth 3 aelt) (string-to-int (pop x-invocation-args))) |
(push (cons (nth 3 aelt) (string-to-number (pop x-invocation-args))) |
150 |
default-frame-alist)))) |
default-frame-alist)))) |
151 |
|
|
152 |
;; Handle options that apply to initial frame only |
;; Handle options that apply to initial frame only |