From 30f41c02aec763d32e62351452da9ef582bc3472 Mon Sep 17 00:00:00 2001
From: 3gg <3gg@shellblade.net>
Date: Fri, 6 Mar 2026 13:30:59 -0800
Subject: Move contrib libraries to contrib repo

---
 .../SDL-3.2.8/build-scripts/git-pre-push-hook.pl   | 78 ----------------------
 1 file changed, 78 deletions(-)
 delete mode 100755 contrib/SDL-3.2.8/build-scripts/git-pre-push-hook.pl

(limited to 'contrib/SDL-3.2.8/build-scripts/git-pre-push-hook.pl')

diff --git a/contrib/SDL-3.2.8/build-scripts/git-pre-push-hook.pl b/contrib/SDL-3.2.8/build-scripts/git-pre-push-hook.pl
deleted file mode 100755
index 63596b6..0000000
--- a/contrib/SDL-3.2.8/build-scripts/git-pre-push-hook.pl
+++ /dev/null
@@ -1,78 +0,0 @@
-#!/usr/bin/perl -w
-
-# To use this script: symlink it to .git/hooks/pre-push, then "git push"
-#
-# This script is called by "git push" after it has checked the remote status,
-# but before anything has been pushed.  If this script exits with a non-zero
-# status nothing will be pushed.
-#
-# This hook is called with the following parameters:
-#
-# $1 -- Name of the remote to which the push is being done
-# $2 -- URL to which the push is being done
-#
-# If pushing without using a named remote those arguments will be equal.
-#
-# Information about the commits which are being pushed is supplied as lines to
-# the standard input in the form:
-#
-#   <local ref> <local sha1> <remote ref> <remote sha1>
-
-use warnings;
-use strict;
-
-my $remote = $ARGV[0];
-my $url = $ARGV[1];
-
-#print("remote: $remote\n");
-#print("url: $url\n");
-
-$url =~ s/\.git$//;  # change myorg/myproject.git to myorg/myproject
-$url =~ s#^git\@github\.com\:#https://github.com/#i;
-my $commiturl = $url =~ /\Ahttps?:\/\/github.com\// ? "$url/commit/" : '';
-
-my $z40 = '0000000000000000000000000000000000000000';
-my $reported = 0;
-
-while (<STDIN>) {
-    chomp;
-    my ($local_ref, $local_sha, $remote_ref, $remote_sha) = split / /;
-    #print("local_ref: $local_ref\n");
-    #print("local_sha: $local_sha\n");
-    #print("remote_ref: $remote_ref\n");
-    #print("remote_sha: $remote_sha\n");
-
-    my $range = '';
-    if ($remote_sha eq $z40) {  # New branch, examine all commits
-        $range = $local_sha;
-    } else { # Update to existing branch, examine new commits
-        $range = "$remote_sha..$local_sha";
-    }
-
-    my $gitcmd = "git log --reverse --oneline --no-abbrev-commit '$range'";
-    open(GITPIPE, '-|', $gitcmd) or die("\n\n$0: Failed to run '$gitcmd': $!\n\nAbort push!\n\n");
-    while (<GITPIPE>) {
-        chomp;
-        if (/\A([a-fA-F0-9]+)\s+(.*?)\Z/) {
-            my $hash = $1;
-            my $msg = $2;
-
-            if (!$reported) {
-                print("\nCommits expected to be pushed:\n");
-                $reported = 1;
-            }
-
-            #print("hash: $hash\n");
-            #print("msg: $msg\n");
-
-            print("$commiturl$hash -- $msg\n");
-        } else {
-            die("$0: Unexpected output from '$gitcmd'!\n\nAbort push!\n\n");
-        }
-    }
-    die("\n\n$0: Failing exit code from running '$gitcmd'!\n\nAbort push!\n\n") if !close(GITPIPE);
-}
-
-print("\n") if $reported;
-
-exit(0);  # Let the push go forward.
-- 
cgit v1.2.3