Commit dc2ae711 authored by Linus Tolke Y's avatar Linus Tolke Y
Browse files

Buggfixes, bug-report, quit-ding

parent c067c665
No preview for this file type
......@@ -24,7 +24,10 @@
#
# $Id$
# $Log$
# Revision 36.3 1993/05/27 15:22:43 linus
# Revision 36.4 1993/07/26 19:07:12 linus
# Buggfixes, bug-report, quit-ding
#
# Revision 36.3 1993/05/27 15:22:43 linus
# install in local/var/elisp
#
# Revision 36.2 1993/05/27 13:21:12 linus
......@@ -109,6 +112,8 @@ MKDIR = /bin/mkdir
RM = /usr/gnu/bin/rm -vf
EMACS-BATCH = emacs -batch -l /usr/local/var/elisp/bytecomp
# for compiling using emacs 19!
EMACS-BATCH = emacs -batch -l ./compatibility.el
# NOTE: lyskom-rest.el must be the last file in PARTS-EL and SRC-ELC.
PARTS-EL = komtypes.el clienttypes.el startup.el \
......
......@@ -618,7 +618,8 @@ This does lyskom-end-of-command"
(server-info->conf-pres-conf lyskom-server-info))
conf-name ""
'lyskom-set-presentation conf-no)
(lyskom-end-of-command))
;; lyskom-end-of-command is done by lyskom-edit-text
)
(defun lyskom-set-presentation (text-no conf-no)
......@@ -823,7 +824,7 @@ CCREP is a list of all recipients that are going to be cc-recipients."
subject "")))
(quit (lyskom-end-of-command)
(ding))))
(signal 'quit "quit in lyskom-comment-recipients"))))
;;; ================================================================
......
......@@ -936,7 +936,7 @@ Format is 23:29 if the text is written today. Otherwise 04-01."
;;; Author: Linus Tolke
(defun kom-compile-bug-report ()
(defun kom-bug-report ()
"This command should make it easier to include the correct info in a buggreport"
(interactive)
(let* ((curbuf (current-buffer))
......@@ -959,6 +959,10 @@ Format is 23:29 if the text is written today. Otherwise 04-01."
(with-output-to-temp-buffer repname
(princ (lyskom-get-string 'buggreport-description))
(princ (lyskom-get-string 'buggreport-internals))
(princ (lyskom-get-string 'buggreport-command-keys))
(terpri)
(princ (key-description (recent-keys)))
(terpri)
(princ (lyskom-get-string 'buggreport-version))
(print lyskom-clientversion)
(princ (lyskom-get-string 'buggreport-emacs-version))
......@@ -976,9 +980,6 @@ Format is 23:29 if the text is written today. Otherwise 04-01."
(goto-char (point-min))
(forward-line 10)
(buffer-substring (point-min) (point))))
(princ (lyskom-get-string 'buggreport-command-keys))
(terpri)
(princ (key-description (recent-keys)))
(if (condition-case ()
debugger-old-buffer
(void-variable nil))
......@@ -1015,6 +1016,8 @@ Format is 23:29 if the text is written today. Otherwise 04-01."
(lyskom-get-string 'buggreport-instead-of-byte-comp)))
(lyskom-message "%s" (lyskom-get-string 'buggreport-compileend))))
(fset 'kom-compile-bug-report (symbol-function 'kom-bug-report))
; ;;; ================================================================
; ;;; Status f|r en session - Status session
......
......@@ -88,7 +88,8 @@ Does lyskom-end-of-command."
(setq lyskom-edit-return-to-configuration config)
(lyskom-edit-insert-miscs misc-list subject body)
(lyskom-message "%s" (lyskom-get-string 'press-C-c-C-c)))
(set-buffer (process-buffer lyskom-proc)))
(set-buffer (process-buffer lyskom-proc))
)
(defun lyskom-edit-insert-miscs (misc-list subject body)
......
......@@ -425,17 +425,27 @@ Ditt allm\344nna meddelande l\366d:
(does-not-exist . "Detta kommando finns inte.")
; Only people fixing bugs or recieving bugg-reports should change these:
(buggreport-compilestart . "Compiling...")
(buggreport-compileend . "Compiling...done")
(buggreport-compilestart . "Skapar buggrapporten...")
(buggreport-compileend . "Skapar buggrapporten...klart")
(buggreport-description . "Detta gjorde jag:
(Fyll i dina kommentarer)\n\n\n
N\344r du skrivit klart skall du skicka in din buggrapport till
LysKOM-utvecklarna. Det sker antingen med email till
bug-lyskom@lysator.liu.se eller i Lysators LysKOM till m\366tet
\"LysKOM; Elispklientens buggrapporter\" eller om inget annat
fungerar med vanligt brev till:
Lysator, c/o ISY, Linkoping University, S-581 83 Linkoping, SWEDEN.
M\344rk kuvertet LysKOM buggrapport.\n\n")
Bland informationen nedan finns ocks\345 en lista p\345 de 100 sist tryckta
tangenterna i din emacs. Om du nyligen loggat in kan den inneh\345lla ditt
lyskoml\366senord. Titta igenom den och \344ndra det som \344r ditt l\366senord
till * * * eller m i t t l \366 s e n eller n\345got annat l\344mpligt.
N\344r du skrivit klart skall du skicka in din buggrapport till LysKOMs
elispklientutvecklare. Det sker antingen:
* med email till bug-lyskom@lysator.liu.se
* i Lysators LysKOM till m\366tet \"LysKOM; Elispklientens buggrapporter\"
* med vanligt brev till:
\tLysator
\tc/o ISY
\tLink\366ping University
\tS-581 83 Linkoping
\tSWEDEN.
M\344rk kuvertet \"LysKOM buggrapport f\366r elispklienten\".\n\n")
(buggreport-internals . "LysKOMs interna information:\n\n")
(buggreport-version . "lyskom-version:")
(buggreport-emacs-version . "emacs-version:")
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment