Remember to cover the basics, that is, what you expected to happen and
what in fact did happen.

Be sure to consult the FAQ section in the manual before submitting
a bug report.  In addition check if the bug is reproducable with an
up-to-date version of AUCTeX.  So please upgrade to the version
available from http://www.gnu.org/software/auctex/ if your
installation is older than the one available from the web site.

If the bug is triggered by a specific (La)TeX file, you should try
to produce a minimal sample file showing the problem and include it
in your report.

Your bug report will be posted to the AUCTeX bug reporting list.
------------------------------------------------------------------------

The filling of doctex modes seems to be erroneous, if I append the words
"wrong filling" at the end of the line beginning with "% This..." in the
appended file doctex_tst.dtx, the result is

% This is a long, senseless sentence; the only reason of it's existence
is
 % to show the wrong filling

This is not what I expect.

An additional question: I've created an auctex style file for the
support of the LaTeX-package fancyvrb following the listings.el, but the
result is not satisfying. While the indentation of the
Verbatim-environment is correct, the indentation of the VerbatimOut has
two errors:
- the first line is indented according to the current environment
instead of beginning at column 1
- the lines following the VerbatimOut environment aren't indented
according to the surrounding environment

Can you give me an advice to correct the erroneous behaviour?

Thanks in advance
Jobst


Emacs  : XEmacs 21.5  (beta28) "fuki" [Lucid] (x86_64-redhat-linux,
Mule) of Sun Jul 20 2008 on x86-2
Package: 2008-12-29

current state:
==============
(setq
 AUCTeX-date "2008-12-29"
 window-system 'x
 LaTeX-version "2e"
 TeX-style-path '("/opt/local/var/auctex/"
"/usr/share/xemacs/site-packages/etc/auctex/style/"
                  "/home/ax006ho/.emacs.d/auctex/auto"

"/home/ax006ho/etc/XEmacs/xemacs-packages/lisp/auctex/style/" "auto"
                  "~/etc/XEmacs/xemacs-packages/lisp/auctex/style/")
 TeX-auto-save t
 TeX-parse-self t
 TeX-master t
 TeX-command-list '(("TeX" "%(PDF)%(tex) %`%S%(PDFout)%(mode)%' %t"
TeX-run-TeX nil
                     (plain-tex-mode ams-tex-mode texinfo-mode) :help
"Run plain TeX")
                    ("LaTeX" "%`%l%(mode)%' %t" TeX-run-TeX nil
(latex-mode doctex-mode) :help
                     "Run LaTeX")
                    ("Makeinfo" "makeinfo %t" TeX-run-compile nil
(texinfo-mode) :help
                     "Run Makeinfo with Info output")
                    ("Makeinfo HTML" "makeinfo --html %t"
TeX-run-compile nil (texinfo-mode) :help
                     "Run Makeinfo with HTML output")
                    ("AmSTeX" "%(PDF)amstex %`%S%(PDFout)%(mode)%' %t"
TeX-run-TeX nil
                     (ams-tex-mode) :help "Run AMSTeX")
                    ("ConTeXt" "texexec --once --texutil %(execopts)%t"
TeX-run-TeX nil
                     (context-mode) :help "Run ConTeXt once")
                    ("ConTeXt Full" "texexec %(execopts)%t" TeX-run-TeX
nil (context-mode) :help
                     "Run ConTeXt until completion")
                    ("BibTeX" "bibtex %s" TeX-run-BibTeX nil t :help
"Run BibTeX")
                    ("View" "%V" TeX-run-discard t t :help "Run Viewer")
                    ("Print" "%p" TeX-run-command t t :help "Print the
file")
                    ("Queue" "%q" TeX-run-background nil t :help "View
the printer queue" :visible
                     TeX-queue-command)
                    ("File" "%(o?)dvips %d -o %f " TeX-run-command t
t :help
                     "Generate PostScript file")
                    ("Index" "makeindex %s" TeX-run-command nil t :help
"Create index file")
                    ("Check" "lacheck %s" TeX-run-compile nil
(latex-mode) :help
                     "Check LaTeX file for correctness")
                    ("Spell" "(TeX-ispell-document \"\")"
TeX-run-function nil t :help
                     "Spell-check the document")
                    ("Clean" "TeX-clean" TeX-run-function nil t :help
                     "Delete generated intermediate files")
                    ("Clean All" "(TeX-clean t)" TeX-run-function nil
t :help
                     "Delete generated intermediate and output files")
                    ("Other" "" TeX-run-command t t :help "Run an
arbitrary command"))
 )

-- 
Prof. Dr. Jobst Hoffmann            Tel:   +49 (2461) 99-31 59
Fachhochschule Aachen Abt. Jülich   Fax:   +49 (2461) 99-31 89
Fachbereich 3                       email: [email protected]

;;; fancyvrb.el --- AUCTeX style for `fancyvrb.sty'

;; Copyright (C) 2004 Free Software Foundation, Inc.

;; Author: J. Hoffmann <[email protected]>
;; Maintainer: [email protected]
;; Created: 2002/12/18
;; Keywords: tex

;;; Commentary:
;;  This file adds support for `fancyvrb.sty'

;;; Code:

(TeX-add-style-hook 
 "fancyvrb"
  (lambda ()
  ;; New environments
  (LaTeX-add-environments
   '("VerbatimOut" (lambda (env &rest ignore)
                     (LaTeX-insert-environment
                      env
                      (let ((options (read-string "(optional) Arguments (key=value list): "))
                            (outfile (read-string "Output file: ")))
                        (concat
                         (if (not (zerop (length options)))
                             (format "[%s]" options))
                         (format "{%s}" outfile))))))
   '("Verbatim" (lambda (env &rest ignore)
                  (LaTeX-insert-environment
                   env
                   (let ((options (read-string "(optional) Arguments (key=value list): ")))
                     (if (string= options "")
                         ""
                       (format "[%s]" options)))))))
  ;; Filling
  (make-local-variable 'LaTeX-indent-environment-list)
  (add-to-list 'LaTeX-indent-environment-list
               '("VerbatimOut" current-indentation)
               '("Verbatim" current-indentation))
  (make-local-variable 'LaTeX-verbatim-regexp)
  (setq LaTeX-verbatim-regexp
        (concat LaTeX-verbatim-regexp "\\|VerbatimOut \\|Verbatim"))
  (add-to-list 'LaTeX-verbatim-environments-local "Verbatim")
  (add-to-list 'LaTeX-verbatim-environments-local "VerbatimOut")
  ;; Fontification
  (when (and (featurep 'font-latex)
             (eq TeX-install-font-lock 'font-latex-setup))
    (add-to-list 'font-latex-match-function-keywords-local "VerbatimOut")
    (add-to-list 'font-latex-match-function-keywords-local "Verbatim")
    (font-latex-match-function-make)
    ;; For syntactic fontification, e.g. verbatim constructs.
    (font-latex-set-syntactic-keywords)
    ;; Tell font-lock about the update.
    (setq font-lock-set-defaults nil)
    (font-lock-set-defaults))))

;;; fancyvrb.el ends here.

%%% doctex_tst.dtx ---
%
% \documentclass[english]{ltxdoc}
%
% \begin{document}
%
% This is a long, senseless sentence; the only reason of it's existence is to show the 
% \end{document}
%
%%% ^^A Local Variables:
%%% ^^A mode: docTeX.
%%% ^^A TeX-master: t
%%% ^^A mode: flyspell
%%% ^^A ispell-local-dictionary: "english"
%%% ^^A End:
%
% end of doctex_tst.dtx

%%% listings+fancyvrb_tst.tex ---
%
%% Author: [email protected]
%% Version: $Id: listings+fancyvrb_tst.tex 0 2009/03/01 17:17:28 ax006ho Exp$

\documentclass[12pt,a4paper,english]{article}

\usepackage{listings}
\usepackage{fancyvrb}

\begin{document}

\begin{itemize}
\item 
  \item First we show the automatic indentation of listings:
\begin{lstlisting}[language=C]
/* a little bit of comment */
\end{lstlisting}
  \item Now  the automatic indentation of verbatim text:
\begin{Verbatim}
A little bit of text
\end{Verbatim}
  \item The inclusion of the previous generated text:
    \begin{VerbatimOut}{a.txt}
Some text!
\end{VerbatimOut}
\VerbatimInput{a.txt}
\end{itemize}

\end{document}

%%% Local Variables:
%%% mode: latex
%%% TeX-master: t
%%% mode: flyspell
%%% ispell-local-dictionary: "english"
%%% End:

_______________________________________________
bug-auctex mailing list
[email protected]
http://lists.gnu.org/mailman/listinfo/bug-auctex

Reply via email to