Script 'mail_helper' called by obssrc Hello community, here is the log from the commit of package guile-json for openSUSE:Factory checked in at 2023-06-26 18:15:58 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Comparing /work/SRC/openSUSE:Factory/guile-json (Old) and /work/SRC/openSUSE:Factory/.guile-json.new.15902 (New) ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Package is "guile-json" Mon Jun 26 18:15:58 2023 rev:12 rq:1095258 version:4.7.3 Changes: -------- --- /work/SRC/openSUSE:Factory/guile-json/guile-json.changes 2022-09-25 15:35:40.347676313 +0200 +++ /work/SRC/openSUSE:Factory/.guile-json.new.15902/guile-json.changes 2023-06-26 18:16:08.382482582 +0200 @@ -1,0 +2,7 @@ +Sun Jun 18 20:35:43 UTC 2023 - Jonathan Brielmaier <[email protected]> + +- Update to 4.7.3: + * Fix a regression introduced in 4.7.1 where (json->RECORD) was not working + with nested fields. + +------------------------------------------------------------------- Old: ---- guile-json-4.7.2.tar.gz guile-json-4.7.2.tar.gz.sig New: ---- guile-json-4.7.3.tar.gz guile-json-4.7.3.tar.gz.sig ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Other differences: ------------------ ++++++ guile-json.spec ++++++ --- /var/tmp/diff_new_pack.Z3nj1o/_old 2023-06-26 18:16:09.026485443 +0200 +++ /var/tmp/diff_new_pack.Z3nj1o/_new 2023-06-26 18:16:09.030485461 +0200 @@ -1,7 +1,7 @@ # # spec file for package guile-json # -# Copyright (c) 2022 SUSE LLC +# Copyright (c) 2023 SUSE LLC # # All modifications and additions to the file contributed by third parties # remain the property of their copyright owners, unless otherwise agreed @@ -17,7 +17,7 @@ Name: guile-json -Version: 4.7.2 +Version: 4.7.3 Release: 0 Summary: JSON module for Guile License: GPL-3.0-or-later ++++++ guile-json-4.7.2.tar.gz -> guile-json-4.7.3.tar.gz ++++++ diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/guile-json-4.7.2/ChangeLog new/guile-json-4.7.3/ChangeLog --- old/guile-json-4.7.2/ChangeLog 2022-06-26 10:43:24.000000000 +0200 +++ new/guile-json-4.7.3/ChangeLog 2022-11-28 04:12:06.000000000 +0100 @@ -1,3 +1,13 @@ +commit 6b6af66710e98ca1a0b0ea3d9a325028ee3035cc +Author: Aleix Conchillo Flaqué <[email protected]> +Date: Sun Nov 27 18:59:20 2022 -0800 + + fix (json->RECORD) + + json/record.scm | 2 +- + tests/test-record.scm | 8 ++++++++ + 2 files changed, 9 insertions(+), 1 deletion(-) + commit fcb13775564d191e1a0f75764f760492219fd615 Author: Aleix Conchillo Flaqué <[email protected]> Date: Sun Jun 26 01:41:46 2022 -0700 diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/guile-json-4.7.2/NEWS new/guile-json-4.7.3/NEWS --- old/guile-json-4.7.2/NEWS 2022-06-26 10:34:09.000000000 +0200 +++ new/guile-json-4.7.3/NEWS 2022-11-28 04:10:24.000000000 +0100 @@ -1,4 +1,10 @@ +* Version 4.7.3 (Nov 27, 2022) + + - Fix a regression introduced in 4.7.1 where (json->RECORD) was not working + with nested fields. + + * Version 4.7.2 (Jun 26, 2022) - Fix breaking change introduced in 4.7.1 and properly allow optional nested diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/guile-json-4.7.2/README new/guile-json-4.7.3/README --- old/guile-json-4.7.2/README 2022-06-26 10:34:38.000000000 +0200 +++ new/guile-json-4.7.3/README 2022-11-28 04:01:17.000000000 +0100 @@ -19,7 +19,7 @@ Download the latest tarball and untar it: -- [guile-json-4.7.2.tar.gz](https://download.savannah.gnu.org/releases/guile-json/guile-json-4.7.2.tar.gz) +- [guile-json-4.7.3.tar.gz](https://download.savannah.gnu.org/releases/guile-json/guile-json-4.7.3.tar.gz) If you are cloning the repository make sure you run this first: diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/guile-json-4.7.2/configure new/guile-json-4.7.3/configure --- old/guile-json-4.7.2/configure 2022-06-26 10:37:07.000000000 +0200 +++ new/guile-json-4.7.3/configure 2022-11-28 04:01:37.000000000 +0100 @@ -1,6 +1,6 @@ #! /bin/sh # Guess values for system-dependent variables and create Makefiles. -# Generated by GNU Autoconf 2.71 for guile-json 4.7.2. +# Generated by GNU Autoconf 2.71 for guile-json 4.7.3. # # Report bugs to <[email protected]>. # @@ -610,8 +610,8 @@ # Identity of this package. PACKAGE_NAME='guile-json' PACKAGE_TARNAME='guile-json' -PACKAGE_VERSION='4.7.2' -PACKAGE_STRING='guile-json 4.7.2' +PACKAGE_VERSION='4.7.3' +PACKAGE_STRING='guile-json 4.7.3' PACKAGE_BUGREPORT='[email protected]' PACKAGE_URL='' @@ -1261,7 +1261,7 @@ # Omit some internal or obsolete options to make the list less imposing. # This message is too long to be a string in the A/UX 3.1 sh. cat <<_ACEOF -\`configure' configures guile-json 4.7.2 to adapt to many kinds of systems. +\`configure' configures guile-json 4.7.3 to adapt to many kinds of systems. Usage: $0 [OPTION]... [VAR=VALUE]... @@ -1328,7 +1328,7 @@ if test -n "$ac_init_help"; then case $ac_init_help in - short | recursive ) echo "Configuration of guile-json 4.7.2:";; + short | recursive ) echo "Configuration of guile-json 4.7.3:";; esac cat <<\_ACEOF @@ -1413,7 +1413,7 @@ test -n "$ac_init_help" && exit $ac_status if $ac_init_version; then cat <<\_ACEOF -guile-json configure 4.7.2 +guile-json configure 4.7.3 generated by GNU Autoconf 2.71 Copyright (C) 2021 Free Software Foundation, Inc. @@ -1450,7 +1450,7 @@ This file contains any messages produced by compilers while running configure, to aid debugging if configure makes a mistake. -It was created by guile-json $as_me 4.7.2, which was +It was created by guile-json $as_me 4.7.3, which was generated by GNU Autoconf 2.71. Invocation command line was $ $0$ac_configure_args_raw @@ -2405,7 +2405,7 @@ # Define the identity of the package. PACKAGE='guile-json' - VERSION='4.7.2' + VERSION='4.7.3' printf "%s\n" "#define PACKAGE \"$PACKAGE\"" >>confdefs.h @@ -3606,7 +3606,7 @@ # report actual input values of CONFIG_FILES etc. instead of their # values after options handling. ac_log=" -This file was extended by guile-json $as_me 4.7.2, which was +This file was extended by guile-json $as_me 4.7.3, which was generated by GNU Autoconf 2.71. Invocation command line was CONFIG_FILES = $CONFIG_FILES @@ -3661,7 +3661,7 @@ cat >>$CONFIG_STATUS <<_ACEOF || ac_write_fail=1 ac_cs_config='$ac_cs_config_escaped' ac_cs_version="\\ -guile-json config.status 4.7.2 +guile-json config.status 4.7.3 configured by $0, generated by GNU Autoconf 2.71, with options \\"\$ac_cs_config\\" diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/guile-json-4.7.2/configure.ac new/guile-json-4.7.3/configure.ac --- old/guile-json-4.7.2/configure.ac 2022-06-26 10:34:21.000000000 +0200 +++ new/guile-json-4.7.3/configure.ac 2022-11-28 04:00:01.000000000 +0100 @@ -19,7 +19,7 @@ # along with guile-json. If not, see https://www.gnu.org/licenses/. # -AC_INIT([guile-json], [4.7.2], [[email protected]]) +AC_INIT([guile-json], [4.7.3], [[email protected]]) AC_CONFIG_MACRO_DIRS([m4]) AC_CONFIG_SRCDIR(json.scm) AC_CONFIG_AUX_DIR([build-aux]) diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/guile-json-4.7.2/json/record.scm new/guile-json-4.7.3/json/record.scm --- old/guile-json-4.7.2/json/record.scm 2022-06-26 10:40:26.000000000 +0200 +++ new/guile-json-4.7.3/json/record.scm 2022-11-28 03:56:59.000000000 +0100 @@ -211,7 +211,7 @@ (vector->list v)))) #`(lambda (v) (if (unspecified? v) *unspecified* - #,(gen-id #'field-rtd "scm->" (cleanup-rtd #'field-rtd))))) + (#,(gen-id #'field-rtd "scm->" (cleanup-rtd #'field-rtd)) v)))) #,(if (vector? (syntax->datum #'field-rtd)) #`(lambda (v) (list->vector diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/guile-json-4.7.2/tests/test-record.scm new/guile-json-4.7.3/tests/test-record.scm --- old/guile-json-4.7.2/tests/test-record.scm 2022-04-19 07:00:52.000000000 +0200 +++ new/guile-json-4.7.3/tests/test-record.scm 2022-11-28 03:58:44.000000000 +0100 @@ -189,6 +189,10 @@ (test-equal "{\"id\":\"11111\",\"username\":\"jane\",\"link\":{\"type\":\"test\",\"url\":\"http://guile.json\"}}"; (account-type->json test-account-type)) +;; Check idempotence +(test-equal (make-account-type "11111" "jane" (make-link-type "test" "http://guile.json";)) + (json->account-type (account-type->json test-account-type))) + ;; Check JSON types with optional nested objects. (define-json-type <omitted-type> @@ -231,6 +235,10 @@ (test-equal "{\"id\":\"11111\",\"username\":\"jane\",\"links\":[{\"type\":\"test\",\"url\":\"http://guile.json\"}]}"; (account-type->json test-account-type)) +;; Check idempotence with vectors +(test-equal (make-account-type "11111" "jane" (list (make-link-type "test" "http://guile.json";))) + (json->account-type (account-type->json test-account-type))) + (let ((fail-count (test-runner-fail-count (test-runner-current)))) (test-end "test-record") (exit (zero? fail-count)))
