# HG changeset patch
# User J.D. Smith <jdsmith@as.arizona.edu>
# Date 1173378657 0
# Node ID 144d0dd66d842a4ed06046765fc7b7e1e409f957
# Parent  3d1773c7f473a64d6f20b53c1e23b624298dd9fe
(idlwave-do-context-help1): Don't visit special help topics for
keywords.
(idlwave-help-assistant-command): Include ".exe" for ms-dos
etc. Assistant command.

diff -r 3d1773c7f473 -r 144d0dd66d84 lisp/progmodes/idlw-help.el
--- a/lisp/progmodes/idlw-help.el	Thu Mar 08 17:54:14 2007 +0000
+++ b/lisp/progmodes/idlw-help.el	Thu Mar 08 18:30:57 2007 +0000
@@ -386,8 +386,7 @@
 			   (< beg (- end 4))))
 	   module keyword cw mod1 mod2 mod3)
       (if (or arg 
-	      (and (not st-ass)
-		   (not classtag)
+	      (and (not classtag)
 		   (not structtag)
 		   (not (member (string-to-char this-word) '(?! ?.)))))
 	  ;; Need the module information
@@ -408,7 +407,8 @@
        (arg (setq mod1 module))
        
        ;; A special topic -- only system help
-       (st-ass (setq mod1 (list (cdr st-ass))))
+       ((and st-ass (not (memq cw '(function-keyword procedure-keyword))))
+	(setq mod1 (list (cdr st-ass))))
        
        ;; A system variable -- only system help
        ((string-match 
@@ -1226,7 +1226,7 @@
 ;; we must pass the -profile argument as well.
 (defvar idlwave-help-assistant-command 
   (if (memq system-type '(ms-dos windows-nt))
-      "bin/bin.x86/idl_assistant"
+      "bin/bin.x86/idl_assistant.exe"
     "bin/idl_assistant")
   "The command, rooted at idlwave-system-directory, which invokes the
 IDL assistant.")