$NetBSD: patch-by,v 1.1 2005/11/02 08:56:40 taca Exp $

--- lib/yaml/types.rb.orig	2005-09-13 12:58:33.000000000 +0900
+++ lib/yaml/types.rb
@@ -10,6 +10,7 @@ module YAML
 	class PrivateType
         def self.tag_subclasses?; false; end
 		attr_accessor :type_id, :value
+        	verbose, $VERBOSE = $VERBOSE, nil
 		def initialize( type, val )
 			@type_id = type; @value = val
             @value.taguri = "x-private:#{ @type_id }"
@@ -17,6 +18,8 @@ module YAML
 		def to_yaml( opts = {} )
             @value.to_yaml( opts )
 		end
+        ensure
+	    $VERBOSE = verbose
 	end
 
     #
@@ -25,6 +28,7 @@ module YAML
     class DomainType
         def self.tag_subclasses?; false; end
 		attr_accessor :domain, :type_id, :value
+        	verbose, $VERBOSE = $VERBOSE, nil
 		def initialize( domain, type, val )
 			@domain = domain; @type_id = type; @value = val
             @value.taguri = "tag:#{ @domain }:#{ @type_id }"
@@ -32,6 +36,8 @@ module YAML
 		def to_yaml( opts = {} )
             @value.to_yaml( opts )
 		end
+              ensure
+        $VERBOSE = verbose
 	end
 
     #
