# HG changeset patch
# User Gerd Moellmann <gerd@gnu.org>
# Date 956771181 0
# Node ID 48df558593f974df4a9bb045639be11c32ec8d14
# Parent  67ffd6aa22da6a64f512255480b9f9e4d2d4d727
*** empty log message ***

diff -r 67ffd6aa22da -r 48df558593f9 etc/NEWS
--- a/etc/NEWS	Wed Apr 26 17:43:04 2000 +0000
+++ b/etc/NEWS	Wed Apr 26 17:46:21 2000 +0000
@@ -1147,6 +1147,16 @@
 When you add a new item, please add it without either +++ or ---
 so I will know I still need to look at it -- rms.
 
+** The function `add-minor-mode' simplifies the definition of minor
+modes.
+
+- Function: add-minor-mode SYMBOL NAME MAP
+
+Register a new minor mode.  SYMBOL is the name of a buffer-local
+variable that is toggled on or off to say whether the minor mode is
+active or not.  NAME is the string that will appear in the mode line
+when the minor mode is active.  MAP is the keymap for the minor mode.
+
 ** The function `shell-command' now sets the default directory of the
 `*Shell Command Output*' buffer to the default directory of the buffer
 from which the command was issued.
@@ -3803,9 +3813,14 @@
 for a sample shell script for calling this function automatically
 every night.
 
-** All you need to do, to enable use of the Desktop package, is to set
+** Desktop changes
+
+*** All you need to do to enable use of the Desktop package, is to set
 the variable desktop-enable to t with Custom.
 
+*** Minor modes are now restored.  Which minor modes are restored
+and how modes are restored is controlled by `desktop-minor-mode-table'.
+
 ** There is no need to do anything special, now, to enable Gnus to
 read and post multi-lingual articles.
 
diff -r 67ffd6aa22da -r 48df558593f9 lisp/ChangeLog
--- a/lisp/ChangeLog	Wed Apr 26 17:43:04 2000 +0000
+++ b/lisp/ChangeLog	Wed Apr 26 17:46:21 2000 +0000
@@ -1,3 +1,21 @@
+2000-04-26  Gerd Moellmann  <gerd@gnu.org>
+
+	* desktop.el (desktop-save): Save list of minor modes.
+	(desktop-create-buffer): Restore minor modes.
+	(desktop-minor-mode-table): New user-option.
+
+	* subr.el (add-minor-mode): New function.
+
+	* image.el (find-image): New function.
+	(defimage): Rewritten to find image at load time.
+
+	* startup.el (normal-top-level-add-to-load-path): Handle
+	case that the default directory is not in load-path.
+
+	* help.el: Old patch from Stefan Monnier.
+	(help-xref-on-pp): New function.
+	(describe-variable): Use it to display xrefs in a symbol's value.
+
 2000-04-26  Stefan Monnier  <monnier@cs.yale.edu>
 
 	* cus-edit.el (custom-face): Fix parenthesis.
diff -r 67ffd6aa22da -r 48df558593f9 lisp/loaddefs.el
--- a/lisp/loaddefs.el	Wed Apr 26 17:43:04 2000 +0000
+++ b/lisp/loaddefs.el	Wed Apr 26 17:46:21 2000 +0000
@@ -3953,7 +3953,7 @@
 ;;;***
 
 ;;;### (autoloads (desktop-load-default desktop-read) "desktop" "desktop.el"
-;;;;;;  (14495 17963))
+;;;;;;  (14598 57772))
 ;;; Generated autoloads from desktop.el
 
 (autoload (quote desktop-read) "desktop" "\
@@ -8017,9 +8017,9 @@
 
 ;;;***
 
-;;;### (autoloads (defimage remove-images insert-image put-image
-;;;;;;  create-image image-type-available-p image-type-from-file-header
-;;;;;;  image-type-from-data) "image" "image.el" (14524 62778))
+;;;### (autoloads (defimage find-image remove-images insert-image
+;;;;;;  put-image create-image image-type-available-p image-type-from-file-header
+;;;;;;  image-type-from-data) "image" "image.el" (14598 54652))
 ;;; Generated autoloads from image.el
 
 (autoload (quote image-type-from-data) "image" "\
@@ -8074,6 +8074,21 @@
 Remove only images that were put in BUFFER with calls to `put-image'.
 BUFFER nil or omitted means use the current buffer." nil nil)
 
+(autoload (quote find-image) "image" "\
+Find an image, choosing one of a list of image specifications.
+
+SPECS is a list of image specifications.  DOC is an optional
+documentation string.
+
+Each image specification in SPECS is a property list.  The contents of
+a specification are image type dependent.  All specifications must at
+least contain the properties `:type TYPE' and either `:file FILE' or
+`:data DATA', where TYPE is a symbol specifying the image type,
+e.g. `xbm', FILE is the file to load the image from, and DATA is a
+string containing the actual image data.  The first image
+specification whose TYPE is supported, and FILE exists, is used to
+define SYMBOL." nil nil)
+
 (autoload (quote defimage) "image" "\
 Define SYMBOL as an image.
 
@@ -13361,7 +13376,7 @@
 ;;;***
 
 ;;;### (autoloads (speedbar-get-focus speedbar-frame-mode) "speedbar"
-;;;;;;  "speedbar.el" (14597 45194))
+;;;;;;  "speedbar.el" (14598 31838))
 ;;; Generated autoloads from speedbar.el
 
 (defalias (quote speedbar) (quote speedbar-frame-mode))
diff -r 67ffd6aa22da -r 48df558593f9 src/ChangeLog
Binary file src/ChangeLog has changed