CVS commit: pkgsrc/pkgtools/url2pkg/files

["Roland Illig" <rillig%netbsd.org@localhost>]

Module Name:    pkgsrc
Committed By:   rillig
Date:           Sun Aug 18 13:50:32 UTC 2019

Modified Files:
        pkgsrc/pkgtools/url2pkg/files: url2pkg.t

Log Message:
pkgtools/url2pkg: consistently use double quotes for string literals


To generate a diff of this commit:
cvs rdiff -u -r1.1 -r1.2 pkgsrc/pkgtools/url2pkg/files/url2pkg.t

Please note that diffs are not public domain; they are subject to the
copyright notices on the relevant files.

Modified files:

Index: pkgsrc/pkgtools/url2pkg/files/url2pkg.t
diff -u pkgsrc/pkgtools/url2pkg/files/url2pkg.t:1.1 pkgsrc/pkgtools/url2pkg/files/url2pkg.t:1.2
--- pkgsrc/pkgtools/url2pkg/files/url2pkg.t:1.1 Sun Aug 18 13:32:21 2019
+++ pkgsrc/pkgtools/url2pkg/files/url2pkg.t     Sun Aug 18 13:50:32 2019
@@ -1,7 +1,7 @@
 # -*- perl -*-
-# $NetBSD: url2pkg.t,v 1.1 2019/08/18 13:32:21 rillig Exp $
+# $NetBSD: url2pkg.t,v 1.2 2019/08/18 13:50:32 rillig Exp $
 
-require 'url2pkg.pl';
+require "url2pkg.pl";
 
 use Test::More;
 
@@ -12,14 +12,14 @@ sub test_add_section__simple() {
        my $lines = [];
 
        add_section($lines, [
-               var('1', '=', 'one'),
-               var('6', '=', 'six'),
+               var("1", "=", "one"),
+               var("6", "=", "six"),
        ]);
 
        is_deeply($lines, [
                "1=\tone",
                "6=\tsix",
-               '',
+               "",
        ]);
 }
 
@@ -27,14 +27,14 @@ sub test_add_section__alignment() {
        my $lines = [];
 
        add_section($lines, [
-               var('short', '=', 'value'),
-               var('long_name', '=', 'value # comment'),
+               var("short", "=", "value"),
+               var("long_name", "=", "value # comment"),
        ]);
 
        is_deeply($lines, [
                "short=\t\tvalue",
                "long_name=\tvalue # comment",
-               '',
+               "",
        ]);
 }
 
@@ -42,19 +42,19 @@ sub test_add_section__operators() {
        my $lines = [];
 
        add_section($lines, [
-               var('123456', '+=', 'value'),
+               var("123456", "+=", "value"),
        ]);
 
        is_deeply($lines, [
                "123456+=\tvalue",
-               '',
+               "",
        ]);
 }
 
 sub test_var_append__not_found() {
        my $lines = [];
 
-       update_var_append($lines, 'VARNAME', 'value');
+       update_var_append($lines, "VARNAME", "value");
 
        is_deeply($lines, []);
 }
@@ -62,7 +62,7 @@ sub test_var_append__not_found() {
 sub test_var_append__only_comment() {
        my $lines = ["VARNAME=\t\t\t# none"];
 
-       update_var_append($lines, 'VARNAME', 'value');
+       update_var_append($lines, "VARNAME", "value");
 
        is_deeply($lines, ["VARNAME=\t\t\tvalue # none"]);
 }
@@ -70,7 +70,7 @@ sub test_var_append__only_comment() {
 sub test_var_append__value_with_comment() {
        my $lines = ["VARNAME=\tvalue # comment"];
 
-       update_var_append($lines, 'VARNAME', 'appended');
+       update_var_append($lines, "VARNAME", "appended");
 
        is_deeply($lines, ["VARNAME=\tvalue appended # comment"]);
 }
@@ -78,14 +78,14 @@ sub test_var_append__value_with_comment(
 sub test_var_append__value_without_comment() {
        my $lines = ["VARNAME+=\tvalue"];
 
-       update_var_append($lines, 'VARNAME', 'appended');
+       update_var_append($lines, "VARNAME", "appended");
 
        is_deeply($lines, ["VARNAME+=\tvalue appended"]);
 }
 
 sub test_generate_initial_package_Makefile_lines__GitHub() {
-       my $url = 'https://github.com/org/proj/archive/v1.0.0.tar.gz';
-       my $pkgsrcdir = $ENV{'PKGSRCDIR'} or die;
+       my $url = "https://github.com/org/proj/archive/v1.0.0.tar.gz";;
+       my $pkgsrcdir = $ENV{"PKGSRCDIR"} or die;
        chdir("$pkgsrcdir/pkgtools/url2pkg") or die;
 
        my @lines = generate_initial_package_Makefile_lines($url);