[Emacs-diffs] emacs/lisp ChangeLog simple.el

[Juanma Barranquero]

CVSROOT:        /sources/emacs
Module name:    emacs
Changes by:     Juanma Barranquero <lektu>      08/12/15 12:52:20

Modified files:
        lisp           : ChangeLog simple.el 

Log message:
        * simple.el (bad-package-check): Fix arguments of `display-warning',
          using the package name as TYPE.  Use `string-match-p'.

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/emacs/lisp/ChangeLog?cvsroot=emacs&r1=1.14946&r2=1.14947
http://cvs.savannah.gnu.org/viewcvs/emacs/lisp/simple.el?cvsroot=emacs&r1=1.957&r2=1.958

Patches:
Index: ChangeLog
===================================================================
RCS file: /sources/emacs/emacs/lisp/ChangeLog,v
retrieving revision 1.14946
retrieving revision 1.14947
diff -u -b -r1.14946 -r1.14947
--- ChangeLog   14 Dec 2008 23:16:09 -0000      1.14946
+++ ChangeLog   15 Dec 2008 12:52:16 -0000      1.14947
@@ -1,3 +1,8 @@
+2008-12-15  Juanma Barranquero  <address@hidden>
+
+       * simple.el (bad-package-check): Fix arguments of `display-warning',
+       using the package name as TYPE.  Use `string-match-p'.
+
 2008-12-14  Roland Winkler  <address@hidden>
 
        * proced.el (proced-sort-interactive, proced-sort-pcpu)
@@ -911,7 +916,6 @@
        * progmodes/tcl.el (tcl-filter): Don't forcibly move point.
 
 2008-11-21  Stefan Monnier  <address@hidden>
-
        * international/quail.el (quail-indent-to): New function.
        (quail-completion-1, quail-completion-list-translations)
        (quail-insert-decode-map): Use it to improve alignment.
@@ -3094,7 +3098,6 @@
 2008-09-12  Glenn Morris  <address@hidden>
 
        * progmodes/f90.el (f90-mode-map): Don't bind \t and \r.
-
        * indent.el (indent-line-function): Doc fix.
        * progmodes/sh-script.el (sh-font-lock-open-heredoc): Doc fix.
 
@@ -11812,7 +11815,6 @@
 
        * find-dired.el (find-dired-filter): Fix last patch to handle
        multi-line process input.  Pad link numbers too.
-
 2008-04-01  Jari Aalto  <address@hidden>
 
        * find-dired.el (find-dired-filter): Align columns by padding file 
sizes.

Index: simple.el
===================================================================
RCS file: /sources/emacs/emacs/lisp/simple.el,v
retrieving revision 1.957
retrieving revision 1.958
diff -u -b -r1.957 -r1.958
--- simple.el   27 Nov 2008 17:07:25 -0000      1.957
+++ simple.el   15 Dec 2008 12:52:19 -0000      1.958
@@ -6335,8 +6335,8 @@
              (boundp symbol)
              (or (eq symbol t)
                  (and (stringp (setq symbol (eval symbol)))
-                      (string-match (nth 2 list) symbol)))
-             (display-warning :warning (nth 3 list))))
+                      (string-match-p (nth 2 list) symbol)))
+             (display-warning package (nth 3 list) :warning)))
     (error nil)))
 
 (mapc (lambda (elem)