Spawn new process with ADDR_NO_RANDOMIZE personality if not already set

[sxemacs] / lisp / frame.el

diff --git a/lisp/frame.el b/lisp/frame.el
index 38c5a33..f366856 100644 (file)
--- a/lisp/frame.el
+++ b/lisp/frame.el
@@ -449,7 +449,6 @@ tty     A standard TTY connection or terminal.  CONNECTION should be
            the Unix command `tty') or nil for XEmacs' standard input
            and output (usually the TTY in which XEmacs started).  Only
            if support for TTY's was compiled into XEmacs.
-gtk        A GTK device.
 ns         A connection to a machine running the NeXTstep windowing
            system.  Not currently implemented.
 pc         A direct-write MS-DOS frame.  Not currently implemented.
@@ -546,8 +545,8 @@ The value returned is the value of the last form in BODY."
   (let ((old-frame (gensym "ssf")))
     `(let ((,old-frame (selected-frame)))
        (unwind-protect
-           (progn ,@body)
-         (select-frame ,old-frame)))))
+          (progn ,@body)
+        (select-frame ,old-frame)))))
 
 (defmacro with-selected-frame (frame &rest body)
   "Execute forms in BODY with FRAME as the selected frame.
@@ -839,7 +838,7 @@ For use as the value of `deselect-frame-hook'."
   :group 'frames)
 
 (defcustom get-frame-for-buffer-default-instance-limit nil
-  "*The default instance limit for creating new frames; 
+  "*The default instance limit for creating new frames;
 see doc of `get-frame-for-buffer'."
   :type 'integer
   :group 'frames)
@@ -898,7 +897,7 @@ This is a subroutine of `get-frame-for-buffer' (which see)."
        ;; Sort the list so that iconic frames will be found last.  They
        ;; will be used too, but mapped frames take precedence.  And
        ;; fully visible frames come before occluded frames.
-        ;; Hidden frames come after really visible ones
+       ;; Hidden frames come after really visible ones
        (setq frames
              (sort (frame-list)
                    #'(lambda (s1 s2)