master 6240c0d 2/2: Remove XEmacs compat code from idlw-help.el

[Stefan Kangas]

branch: master
commit 6240c0dc1f55c55ad1fef09a3a0a65060736726c
Author: Stefan Kangas <stefan@marxist.se>
Commit: Stefan Kangas <stefan@marxist.se>

    Remove XEmacs compat code from idlw-help.el
    
    * lisp/progmodes/idlw-help.el (idlwave-do-context-help)
    (idlwave-help-show-help-frame): Remove XEmacs compat code.
---
 lisp/progmodes/idlw-help.el | 14 +++-----------
 1 file changed, 3 insertions(+), 11 deletions(-)

diff --git a/lisp/progmodes/idlw-help.el b/lisp/progmodes/idlw-help.el
index 68809ce..b17bcc3 100644
--- a/lisp/progmodes/idlw-help.el
+++ b/lisp/progmodes/idlw-help.el
@@ -365,7 +365,6 @@ It collects and prints the diagnostics messages."
        (idlwave-help-diagnostics nil))
     ;; Check for frame switching.  When the command is invoked twice
     ;; at the same position, we try to switch to the help frame
-    ;; FIXME:  Frame switching works only on XEmacs
     (if (and idlwave-experimental
             (equal last-command this-command)
             (equal idlwave-last-context-help-pos marker))
@@ -1200,16 +1199,9 @@ Useful when source code is displayed as help.  See the 
option
     (setq idlwave-help-frame
          (make-frame idlwave-help-frame-parameters))
     ;; Strip menubar (?) and toolbar from the Help frame.
-    (if (fboundp 'set-specifier)
-       (progn
-         ;; XEmacs
-         (let ((sval (cons idlwave-help-frame nil)))
-           ;; (set-specifier menubar-visible-p sval)
-           (set-specifier default-toolbar-visible-p sval)))
-      ;; Emacs
-      (modify-frame-parameters idlwave-help-frame
-                              '(;;(menu-bar-lines . 0)
-                                (tool-bar-lines . 0)))))
+    (modify-frame-parameters idlwave-help-frame
+                             '(;;(menu-bar-lines . 0)
+                               (tool-bar-lines . 0))))
   (select-frame idlwave-help-frame))
 
 (defun idlwave-help-get-help-buffer ()