Småfixar

doc/Makefile

@@ -23,9 +23,12 @@
 # Please mail bug reports to bug-lyskom@lysator.liu.se.
 #
 # $Log$
+# Revision 44.3  1997/09/16 15:07:36  byers
+# Småfixar
+#
 # Revision 44.2  1997/08/11 19:54:02  davidk
-# Ändrade versionsnumret till 0.45
-# Ladda ../src/widget.el manuellt när man bygger lyskom-variables.data
+# ndrade versionsnumret till 0.45
+# Ladda ../src/widget.el manuellt nr man bygger lyskom-variables.data
 #
 # Revision 44.1  1996/09/03 16:05:34  byers
 # Remainders for 0.44.1
@@ -80,7 +83,7 @@
 #
 # If you edit this, make sure it works afterwards also. /Linus
 
-CLIENTVERSION = 0.45
+CLIENTVERSION = 0.45.1
 
 SHELL = /bin/sh
 RM = rm -vf

src/ChangeLog

 Tue Sep 16 11:24:24 1997  David Byers  <davby@ida.liu.se>
 
+	* commands2.el (kom-previous-kom): Anvnd def-kom-command.
+	(kom-next-kom): Dito.
+
+	* lyskom-rest.el (lyskom-format-aux-help): Fixade fel i %C.
+
+	* english-strings.el,swedish-strings.el (lyskom-command): Lade
+ 	till kom-next-kom och kom-previous-kom
+
+	* vars.el.in (lyskom-commands): Dito.
+
 	* lyskom.el: Release av version 0.45.
 
 	* envcheck.el: Snyggare meddelanden.

src/Makefile

@@ -36,8 +36,8 @@
 # makefile too!
 #
 
-CLIENTVERSION = 0.45
-DOCFILES=NEWS-0.45 MIGRATION-0.44-0.45
+CLIENTVERSION = 0.45.1
+DOCFILES=NEWS-0.45.1 MIGRATION-0.44-0.45
 
 FTPDIR=/home/davby/www-pub
 #FTPDIR = /usr/ftp/pub/lyskom/elisp-client

src/commands2.el

@@ -1495,7 +1495,7 @@ membership info."
 
 
 
-(defun kom-next-kom ()
+(def-kom-command kom-next-kom ()
   "Pop up the next lyskom-session."
   (interactive)
   (if (lyskom-buffer-p (current-buffer))
@@ -1531,7 +1531,7 @@ membership info."
     (error "No active LysKOM buffers")))
 
 
-(defun kom-previous-kom ()
+(def-kom-command kom-previous-kom ()
   "Pop up the previous lyskom-session."
   (interactive)
   (if (lyskom-buffer-p (current-buffer))

src/english-strings.el

@@ -1161,6 +1161,8 @@ On since %#8s%#9s")
     (kom-remote-quit          . "Remote control quit")
 
     (kom-status-session . "Status (of a) session")
+    (kom-next-kom             . "Next LysKOM")
+    (kom-previous-kom         . "Previous LysKOM")
     (kom-customize      . "Customize LysKOM")
     (kom-change-language . "Change language")
     (kom-calculate            . "Calculate")

src/lyskom-rest.el

@@ -1081,8 +1081,8 @@ Note that it is not allowed to use deferred insertions in the text."
                                      (append arg nil) " "))
                          ((and arg (symbolp arg))
                           (if (memq arg lyskom-commands)
-			      (lyskom-get-string arg)
-			    (princ arg)))
+			      (lyskom-command-name arg)
+			    (prin1-to-string arg t)))
                          (t (format "(%S)" arg)))))
 
      ;;

src/vars.el.in

@@ -1022,6 +1022,9 @@ Users are encouraged to use their best sense of humor."
     kom-customize
     kom-change-language
     kom-calculate
+
+    kom-next-kom
+    kom-previous-kom
     ))
 
 ;(defconst lyskom-elisp-variables