Function: viper-submit-report

viper-submit-report is an interactive and byte-compiled function defined in viper-cmd.el.gz.

Signature

(viper-submit-report)

Documentation

Submit bug report on Viper.

Key Bindings

Source Code

;; Defined in /usr/src/emacs/lisp/emulation/viper-cmd.el.gz
(defun viper-submit-report ()
  "Submit bug report on Viper."
  (interactive)
  (defvar viper-color-display-p)
  (defvar viper-frame-parameters)
  (defvar viper-minibuffer-emacs-face)
  (defvar viper-minibuffer-vi-face)
  (defvar viper-minibuffer-insert-face)
  (let ((reporter-prompt-for-summary-p t)
	(viper-color-display-p (if (viper-window-display-p)
			      (viper-color-display-p)
                              'non-x))
        (viper-frame-parameters (frame-parameters (selected-frame)))
	(viper-minibuffer-emacs-face (if (viper-has-face-support-p)
                                         (facep
                                          viper-minibuffer-emacs-face)
                                       'non-x))
        (viper-minibuffer-vi-face (if (viper-has-face-support-p)
                                      (facep viper-minibuffer-vi-face)
                                    'non-x))
        (viper-minibuffer-insert-face (if (viper-has-face-support-p)
                                          (facep
                                           viper-minibuffer-insert-face)
                                        'non-x))
	varlist salutation window-config)

    (setq varlist (list 'viper-vi-minibuffer-minor-mode
                        'viper-insert-minibuffer-minor-mode
                        'viper-vi-intercept-minor-mode
                        'viper-vi-local-user-minor-mode
                        'viper-vi-kbd-minor-mode
                        'viper-vi-global-user-minor-mode
                        'viper-vi-state-modifier-minor-mode
                        'viper-vi-diehard-minor-mode
                        'viper-vi-basic-minor-mode
                        'viper-replace-minor-mode
                        'viper-insert-intercept-minor-mode
                        'viper-insert-local-user-minor-mode
                        'viper-insert-kbd-minor-mode
                        'viper-insert-global-user-minor-mode
                        'viper-insert-state-modifier-minor-mode
                        'viper-insert-diehard-minor-mode
                        'viper-insert-basic-minor-mode
                        'viper-emacs-intercept-minor-mode
                        'viper-emacs-local-user-minor-mode
                        'viper-emacs-kbd-minor-mode
                        'viper-emacs-global-user-minor-mode
                        'viper-emacs-state-modifier-minor-mode
                        'viper-automatic-iso-accents
			'viper-special-input-method
                        'viper-want-emacs-keys-in-insert
                        'viper-want-emacs-keys-in-vi
                        'viper-keep-point-on-undo
                        'viper-no-multiple-ESC
                        'viper-electric-mode
                        'viper-ESC-key
                        'viper-want-ctl-h-help
                        'viper-ex-style-editing
                        'viper-delete-backwards-in-replace
                        'viper-vi-style-in-minibuffer
                        'viper-vi-state-hook
                        'viper-insert-state-hook
                        'viper-replace-state-hook
                        'viper-emacs-state-hook
                        'ex-cycle-other-window
                        'ex-cycle-through-non-files
                        'viper-expert-level
                        'major-mode
                        'window-system
			'viper-color-display-p
			'viper-frame-parameters
			'viper-minibuffer-vi-face
			'viper-minibuffer-insert-face
			'viper-minibuffer-emacs-face
			))
	  (setq salutation "
Congratulations! You may have unearthed a bug in Viper!
Please mail a concise, accurate summary of the problem to the address above.

-------------------------------------------------------------------")
	  (setq window-config (current-window-configuration))
	  (with-output-to-temp-buffer " *viper-info*"
	    (switch-to-buffer " *viper-info*")
	    (delete-other-windows)
	    (princ "
PLEASE FOLLOW THESE PROCEDURES
------------------------------

Before reporting a bug, please verify that it is related to Viper, and is
not caused by other packages you are using.

Don't report compilation warnings, unless you are certain that there is a
problem.  These warnings are normal and unavoidable.

Please note that users should not modify variables and keymaps other than
those advertised in the manual.  Such `customization' is likely to crash
Viper, as it would any other improperly customized Emacs package.

If you are reporting an error message received while executing one of the
Viper commands, type:

    M-x set-variable <Return> debug-on-error <Return> t <Return>

Then reproduce the error.  The above command will cause Emacs to produce a
back trace of the execution that leads to the error.  Please include this
trace in your bug report.

If you believe that one of Viper's commands goes into an infinite loop
\(e.g., Emacs freezes), type:

    M-x set-variable <Return> debug-on-quit <Return> t <Return>

Then reproduce the problem.  Wait for a few seconds, then type C-g to abort
the current command.  Include the resulting back trace in the bug report.

Mail anyway (y or n)? ")
	    (if (y-or-n-p "Mail anyway? ")
		()
	      (set-window-configuration window-config)
	      (error "Bug report aborted")))

	  (require 'reporter)
	  (set-window-configuration window-config)

	  (reporter-submit-bug-report
	   "kifer@cs.stonybrook.edu, bug-gnu-emacs@gnu.org"
	   (viper-version)
	   varlist
	   nil 'delete-other-windows
	   salutation)))