Script 'mail_helper' called by obssrc
Hello community,

here is the log from the commit of package emacs-flim for openSUSE:Factory 
checked in at 2023-05-20 17:24:07
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Comparing /work/SRC/openSUSE:Factory/emacs-flim (Old)
 and      /work/SRC/openSUSE:Factory/.emacs-flim.new.1533 (New)
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++

Package is "emacs-flim"

Sat May 20 17:24:07 2023 rev:4 rq:1088028 version:1.14.9+136+g2cf5a78

Changes:
--------
--- /work/SRC/openSUSE:Factory/emacs-flim/emacs-flim.changes    2022-05-24 
20:33:38.615041312 +0200
+++ /work/SRC/openSUSE:Factory/.emacs-flim.new.1533/emacs-flim.changes  
2023-05-20 17:24:09.305727263 +0200
@@ -1,0 +2,11 @@
+Thu May 18 13:50:48 UTC 2023 - sch...@linux-m68k.org
+
+- Update to version 1.14.9+136+g2cf5a78:
+  * Don't inhibit EOL conversion for oauth2.el.
+  * Use `ash' instead of `lsh'
+  * Fix CCL lexical analyzer fails to parse quoted-string
+  * Add redirect URI for Gmail
+  * Update docstring syntax
+  * * README: Update requirements.  Wide int feature is required.
+
+-------------------------------------------------------------------

Old:
----
  flim-1.14.9+130+g289e5bbd66f6.obscpio

New:
----
  flim-1.14.9+136+g2cf5a78.obscpio

++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++

Other differences:
------------------
++++++ emacs-flim.spec ++++++
--- /var/tmp/diff_new_pack.N8PniJ/_old  2023-05-20 17:24:10.873736187 +0200
+++ /var/tmp/diff_new_pack.N8PniJ/_new  2023-05-20 17:24:10.921736460 +0200
@@ -17,7 +17,7 @@
 
 
 Name:           emacs-flim
-Version:        1.14.9+130+g289e5bbd66f6
+Version:        1.14.9+136+g2cf5a78
 Release:        0
 Summary:        An Emacs Library for MIME
 License:        GPL-2.0-or-later

++++++ _servicedata ++++++
--- /var/tmp/diff_new_pack.N8PniJ/_old  2023-05-20 17:24:11.261738394 +0200
+++ /var/tmp/diff_new_pack.N8PniJ/_new  2023-05-20 17:24:11.277738485 +0200
@@ -1,6 +1,6 @@
 <servicedata>
 <service name="tar_scm">
                 <param name="url">https://github.com/wanderlust/flim</param>
-              <param 
name="changesrevision">289e5bbd66f6f14306a6e0b922ee8f26267e2470</param></service></servicedata>
+              <param 
name="changesrevision">2cf5a7891090faca8de725b1d3743dcedf233ea2</param></service></servicedata>
 (No newline at EOF)
 

++++++ flim-1.14.9+130+g289e5bbd66f6.obscpio -> 
flim-1.14.9+136+g2cf5a78.obscpio ++++++
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/flim-1.14.9+130+g289e5bbd66f6/README 
new/flim-1.14.9+136+g2cf5a78/README
--- old/flim-1.14.9+130+g289e5bbd66f6/README    2022-05-03 16:42:53.000000000 
+0200
+++ new/flim-1.14.9+136+g2cf5a78/README 2023-02-05 15:23:23.000000000 +0100
@@ -6,8 +6,9 @@
 * What's FLIM-LB?
 
 FLIM-LB is a variant of FLIM.  The most remarkable feature is that it
-uses lexical binding and supports only Emacs 24.5 and later.  See
-README.[en|ja] for details of original FLIM.
+uses lexical binding and supports only Emacs 24.5 and later.
+Furthermore, wide int feature is required on 32-bit machines.
+See README.[en|ja] for details of original FLIM.
 
 
 * GitHub
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/flim-1.14.9+130+g289e5bbd66f6/mel-q-ccl.el 
new/flim-1.14.9+136+g2cf5a78/mel-q-ccl.el
--- old/flim-1.14.9+130+g289e5bbd66f6/mel-q-ccl.el      2022-05-03 
16:42:53.000000000 +0200
+++ new/flim-1.14.9+136+g2cf5a78/mel-q-ccl.el   2023-02-05 15:23:23.000000000 
+0100
@@ -84,7 +84,7 @@
 (defconst mel-ccl-high-table
   (vconcat
    (mapcar
-    (lambda (v) (nth (lsh v -4) mel-ccl-16-to-256-table))
+    (lambda (v) (nth (ash v -4) mel-ccl-16-to-256-table))
     mel-ccl-256-table)))
 
 (defconst mel-ccl-low-table
@@ -169,7 +169,7 @@
                            `((write r0 ,(vconcat
                                          (mapcar
                                           (lambda (r0)
-                                            (logior (lsh r0 4) v))
+                                            (logior (ash r0 4) v))
                                           mel-ccl-16-table)))
                              (break))
                          '(repeat)))
@@ -703,7 +703,7 @@
                               ,(vconcat
                                 (mapcar
                                  (lambda (r0)
-                                   (logior (lsh r0 4) tmp))
+                                   (logior (ash r0 4) tmp))
                                  mel-ccl-16-table)))
                           ;; '=' [\t ]* r1:r0:[0-9A-F] r2:[^0-9A-F]
                           ;; invalid input
@@ -745,7 +745,7 @@
                                (break))))))
                     `((read r0)
                       (if (r0 == ?\ )
-                          (,reg |= ,(lsh 1 bit))
+                          (,reg |= ,(ash 1 bit))
                         (if (r0 != ?\t)
                             ((r6 = ,(+ (* regnum 28) bit))
                              (break)))))))
@@ -789,7 +789,7 @@
               'append
               (mapcar
                (lambda (bit)
-                 `((if (,reg & ,(lsh 1 bit))
+                 `((if (,reg & ,(ash 1 bit))
                        (write ?\ )
                      (write ?\t))
                    (if (r6 == ,(+ (* regnum 28) bit 1))
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/flim-1.14.9+130+g289e5bbd66f6/mime-conf.el 
new/flim-1.14.9+136+g2cf5a78/mime-conf.el
--- old/flim-1.14.9+130+g289e5bbd66f6/mime-conf.el      2022-05-03 
16:42:53.000000000 +0200
+++ new/flim-1.14.9+136+g2cf5a78/mime-conf.el   2023-02-05 15:23:23.000000000 
+0100
@@ -190,9 +190,9 @@
 SITUATION is an association-list about information of entity.  Its key
 may be:
 
-       'type           primary media-type
-       'subtype        media-subtype
-       'filename       filename
+       \\='type                primary media-type
+       \\='subtype     media-subtype
+       \\='filename    filename
        STRING          parameter of Content-Type field"
   (let ((i 0)
        (len (length mtext))
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/flim-1.14.9+130+g289e5bbd66f6/mime-parse.el 
new/flim-1.14.9+136+g2cf5a78/mime-parse.el
--- old/flim-1.14.9+130+g289e5bbd66f6/mime-parse.el     2022-05-03 
16:42:53.000000000 +0200
+++ new/flim-1.14.9+136+g2cf5a78/mime-parse.el  2023-02-05 15:23:23.000000000 
+0100
@@ -92,12 +92,12 @@
                      r0
                      ,@(let* ((count (1+ (max tag ?\\)))
                               (result (make-vector count '(write-repeat r0))))
-                         (aset result tag '(break))
                          (aset result ?\\ `((write "\\\\")
                                             (read r0)
                                             ,wrt
                                             (repeat)))
                          (aset result ?\" '((write "\\\"") (repeat)))
+                         (aset result tag '(break))
                          (mapcar 'identity result)))
                     (write-repeat r0))
                    (write "\")")
@@ -577,7 +577,7 @@
 (defun mime-parse-parameters (tokens)
   "Parse TOKENS as MIME parameter values.
 Return a property list, which is a list of the form
-\(PARAMETER-NAME1 VALUE1 PARAMETER-NAME2 VALUE2...)."
+(PARAMETER-NAME1 VALUE1 PARAMETER-NAME2 VALUE2...)."
   (let (params attribute)
     (while (and tokens
                (eq (car (car tokens)) 'tspecials)
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/flim-1.14.9+130+g289e5bbd66f6/sasl-scram.el 
new/flim-1.14.9+136+g2cf5a78/sasl-scram.el
--- old/flim-1.14.9+130+g289e5bbd66f6/sasl-scram.el     2022-05-03 
16:42:53.000000000 +0200
+++ new/flim-1.14.9+136+g2cf5a78/sasl-scram.el  2023-02-05 15:23:23.000000000 
+0100
@@ -88,9 +88,9 @@
     (if no-security-layer
        (aset csecinfo 0 (logior (aref csecinfo 0) 1))
       (aset csecinfo 1
-           (lsh (logand buffer-size (lsh 255 16)) -16))
+           (ash (logand buffer-size (ash 255 16)) -16))
       (aset csecinfo 2
-           (lsh (logand buffer-size (lsh 255 8)) -8))
+           (ash (logand buffer-size (ash 255 8)) -8))
       (aset csecinfo 3 (logand buffer-size 255)))
     csecinfo))
 
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/flim-1.14.9+130+g289e5bbd66f6/sasl-xoauth2.el 
new/flim-1.14.9+136+g2cf5a78/sasl-xoauth2.el
--- old/flim-1.14.9+130+g289e5bbd66f6/sasl-xoauth2.el   2022-05-03 
16:42:53.000000000 +0200
+++ new/flim-1.14.9+136+g2cf5a78/sasl-xoauth2.el        2023-02-05 
15:23:23.000000000 +0100
@@ -67,7 +67,8 @@
      "https://accounts.google.com/o/oauth2/v2/auth";
      "https://www.googleapis.com/oauth2/v4/token";
      "https://mail.google.com/";
-     nil)
+     ;; redirect URI is required
+     "http://localhost/result";)
     ;; Outlook.com
     ("\\.outlook\\.com$"
      "https://login.live.com/oauth20_authorize.srf";
@@ -129,13 +130,16 @@
 (defun sasl-xoauth2-refresh-access (token)
   "Refresh OAuth access TOKEN.
 TOKEN should be obtained with `oauth2-request-access'."
-  (let ((response
-        (oauth2-make-access-request
-          (oauth2-token-token-url token)
-          (concat "client_id=" (oauth2-token-client-id token)
-                  "&client_secret=" (oauth2-token-client-secret token)
-                  "&refresh_token=" (oauth2-token-refresh-token token)
-                  "&grant_type=refresh_token"))))
+  ;; url package would fail on Windows without EOL conversion.
+  (let* ((inhibit-eol-conversion nil)
+        (coding-system-for-read nil)
+        (response
+         (oauth2-make-access-request
+           (oauth2-token-token-url token)
+           (concat "client_id=" (oauth2-token-client-id token)
+                   "&client_secret=" (oauth2-token-client-secret token)
+                   "&refresh_token=" (oauth2-token-refresh-token token)
+                   "&grant_type=refresh_token"))))
     (setf (oauth2-token-access-token token)
           (cdr (assq 'access_token response)))
     ;; Update authorization time.
@@ -201,6 +205,9 @@
 (defun sasl-xoauth2-response (client _step &optional _retry)
   (let ((host (sasl-client-server client))
        (user (sasl-client-name client))
+       ;; url package would fail on Windows without EOL conversion.
+       (inhibit-eol-conversion nil)
+       (coding-system-for-read nil)
        info access-token oauth2-token
        auth-url token-url client-id scope redirect-uri client-secret)
     (setq info (sasl-xoauth2-resolve-urls host user)
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/flim-1.14.9+130+g289e5bbd66f6/sasl.el 
new/flim-1.14.9+136+g2cf5a78/sasl.el
--- old/flim-1.14.9+130+g289e5bbd66f6/sasl.el   2022-05-03 16:42:53.000000000 
+0200
+++ new/flim-1.14.9+136+g2cf5a78/sasl.el        2023-02-05 15:23:23.000000000 
+0100
@@ -197,7 +197,7 @@
   ;; Don't use microseconds from (current-time), they may be unsupported.
   ;; Instead we use this randomly inited counter.
   (setq sasl-unique-id-char
-       (% (1+ (or sasl-unique-id-char (logand (random t) (1- (lsh 1 20)))))
+       (% (1+ (or sasl-unique-id-char (logand (random t) (1- (ash 1 20)))))
           ;; (current-time) returns 16-bit ints,
           ;; and 2^16*25 just fits into 4 digits i base 36.
           (* 25 25)))
@@ -205,10 +205,10 @@
     (concat
      (sasl-unique-id-number-base36
       (+ (/ tm 65536)
-        (lsh (% sasl-unique-id-char 25) 16)) 4)
+        (ash (% sasl-unique-id-char 25) 16)) 4)
      (sasl-unique-id-number-base36
       (+ (% tm 65536)
-        (lsh (/ sasl-unique-id-char 25) 16)) 4))))
+        (ash (/ sasl-unique-id-char 25) 16)) 4))))
 
 (defun sasl-unique-id-number-base36 (num len)
   (if (if (< len 0)
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/flim-1.14.9+130+g289e5bbd66f6/smtp.el 
new/flim-1.14.9+136+g2cf5a78/smtp.el
--- old/flim-1.14.9+130+g289e5bbd66f6/smtp.el   2022-05-03 16:42:53.000000000 
+0200
+++ new/flim-1.14.9+136+g2cf5a78/smtp.el        2023-02-05 15:23:23.000000000 
+0100
@@ -142,8 +142,8 @@
 `open-network-stream' and should return a process object.
 Here is an example:
 
-\(setq smtp-open-connection-function
-      #'(lambda (name buffer host service)
+(setq smtp-open-connection-function
+      #\\='(lambda (name buffer host service)
          (let ((process-connection-type nil))
            (start-process name buffer \"ssh\" \"-C\" host
                           \"nc\" host service))))
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/flim-1.14.9+130+g289e5bbd66f6/std11.el 
new/flim-1.14.9+136+g2cf5a78/std11.el
--- old/flim-1.14.9+130+g289e5bbd66f6/std11.el  2022-05-03 16:42:53.000000000 
+0200
+++ new/flim-1.14.9+136+g2cf5a78/std11.el       2023-02-05 15:23:23.000000000 
+0100
@@ -285,13 +285,13 @@
                      r0
                      ,@(let* ((count (1+ (max tag ?\\)))
                               (result (make-vector count '(write-repeat r0))))
-                         (aset result tag '(break))
                          (aset result ?\\ `((write "\\\\")
                                             (read r0)
                                             ,wrt
                                             (repeat)))
                          (aset result ?\" '((write "\\\"")
                                             (repeat)))
+                         (aset result tag '(break))
                          (mapcar 'identity result)))
                     (write-repeat r0))
                    (write "\")")

++++++ flim.obsinfo ++++++
--- /var/tmp/diff_new_pack.N8PniJ/_old  2023-05-20 17:24:11.629740489 +0200
+++ /var/tmp/diff_new_pack.N8PniJ/_new  2023-05-20 17:24:11.645740580 +0200
@@ -1,6 +1,5 @@
 name: flim
-version: 1.14.9+130+g289e5bbd66f6
-mtime: 1651588973
-commit: 289e5bbd66f6f14306a6e0b922ee8f26267e2470
-
+version: 1.14.9+136+g2cf5a78
+mtime: 1675607003
+commit: 2cf5a7891090faca8de725b1d3743dcedf233ea2
 

Reply via email to