From 3b55fdbb00815194e40c34e4d0c3a87b5b5ff30a Mon Sep 17 00:00:00 2001
From: espie <espie@openbsd.org>
Date: Sat, 27 May 2023 10:00:23 +0000
Subject: [PATCH] cosmetic/comments improvement

---
 usr.sbin/pkg_add/OpenBSD/AddDelete.pm | 13 +++++++------
 1 file changed, 7 insertions(+), 6 deletions(-)

diff --git a/usr.sbin/pkg_add/OpenBSD/AddDelete.pm b/usr.sbin/pkg_add/OpenBSD/AddDelete.pm
index bdf04f6c984..08662844fa7 100644
--- a/usr.sbin/pkg_add/OpenBSD/AddDelete.pm
+++ b/usr.sbin/pkg_add/OpenBSD/AddDelete.pm
@@ -1,5 +1,5 @@
 # ex:ts=8 sw=4:
-# $OpenBSD: AddDelete.pm,v 1.97 2023/04/19 18:07:43 sthen Exp $
+# $OpenBSD: AddDelete.pm,v 1.98 2023/05/27 10:00:23 espie Exp $
 #
 # Copyright (c) 2007-2010 Marc Espie <espie@openbsd.org>
 #
@@ -19,7 +19,7 @@
 use strict;
 use warnings;
 
-# common framework, let's place most everything in there
+# common behavior to pkg_add / pkg_delete
 package main;
 our $not;
 
@@ -166,6 +166,7 @@ sub parse_and_run
 	return $state->{bad} != 0;
 }
 
+# $self->silence_children($state)
 sub silence_children
 {
 	1
@@ -300,12 +301,12 @@ sub build_deptree
 {
 	my ($state, $set, @deps) = @_;
 
-	if (defined $state->{deptree}->{$set}) {
-		$set = $state->{deptree}->{$set};
+	if (defined $state->{deptree}{$set}) {
+		$set = $state->{deptree}{$set};
 	}
 	for my $dep (@deps) {
-		$state->{deptree}->{$dep} = $set unless
-		    defined $state->{deptree}->{$dep};
+		$state->{deptree}{$dep} = $set unless
+		    defined $state->{deptree}{$dep};
 	}
 }
 
-- 
2.20.1