[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] Changes to emacs/lisp/term/x-win.el,v
From: |
Jan Djärv |
Subject: |
[Emacs-diffs] Changes to emacs/lisp/term/x-win.el,v |
Date: |
Thu, 07 Feb 2008 14:06:35 +0000 |
CVSROOT: /cvsroot/emacs
Module name: emacs
Changes by: Jan Djärv <jhd> 08/02/07 14:06:35
Index: x-win.el
===================================================================
RCS file: /cvsroot/emacs/emacs/lisp/term/x-win.el,v
retrieving revision 1.222
retrieving revision 1.223
diff -u -b -r1.222 -r1.223
--- x-win.el 1 Feb 2008 16:01:25 -0000 1.222
+++ x-win.el 7 Feb 2008 14:06:35 -0000 1.223
@@ -190,6 +190,15 @@
(setq initial-frame-alist (cons (cons 'name x-resource-name)
initial-frame-alist)))
+;; Handle the --parent-id option.
+(defun x-handle-parent-id (switch)
+ (or (consp x-invocation-args)
+ (error "%s: missing argument to `%s' option" (invocation-name) switch))
+ (setq parent-id (string-to-number (car x-invocation-args))
+ x-invocation-args (cdr x-invocation-args))
+ (setq initial-frame-alist (cons (cons 'parent-id parent-id)
+ initial-frame-alist)))
+
(defvar x-display-name nil
"The name of the X display on which Emacs was started.