# HG changeset patch
# User HIROSE Yuuji <yuuji@gentei.org>
# Date 1527925646 -32400
# Node ID 071cd0ab1c719302940efa8499414ebf79e055bc
# Parent  ea6956f10ce71827cc78c4566889dcf0b2c61899
Optional second arg. for YaTeX-help suppress ask of new entry creation

diff -r ea6956f10ce7 -r 071cd0ab1c71 yatexhlp.el
--- a/yatexhlp.el	Sat Jun 02 15:57:55 2018 +0900
+++ b/yatexhlp.el	Sat Jun 02 16:47:26 2018 +0900
@@ -1,7 +1,7 @@
 ;;; yatexhlp.el --- YaTeX helper for LaTeX -*- coding: sjis -*-
 ;;; 
-;;; (c)1994,1998,2004,2014,2015 by HIROSE Yuuji.[yuuji@yatex.org]
-;;; Last modified Sun Sep 17 10:23:19 2017 on firestorm
+;;; (c)1994,1998,2004,2014,2015,2018 by HIROSE Yuuji.[yuuji@yatex.org]
+;;; Last modified Sat Jun  2 16:45:45 2018 on firestorm
 ;;; $Id$
 
 ;;; Code:
@@ -302,9 +302,11 @@
       (message "No matches found.")))
 
 ;;;###autoload
-(defun YaTeX-help (&optional macro)
+(defun YaTeX-help (&optional macro ref-only)
   "Show help buffer of LaTeX/TeX commands or macros.
-Optional argument MACRO, if supplied, is directly selected to keyword."
+Optional argument MACRO, if supplied, is directly selected to keyword.
+Non-nil for optional second argument REF-ONLY inhibits call enrich-help
+for non-interactive use."
   (interactive)
   (let (p beg end command)
     (save-excursion
@@ -341,4 +343,5 @@
     (setq YaTeX-help-saved-config (current-window-configuration))
     (or (YaTeX-refer-help command YaTeX-help-file)
 	(YaTeX-refer-help command YaTeX-help-file-private)
+	ref-only
 	(YaTeX-enrich-help command))))