ber formatted next_msgid

Author: Jerry Cheung

lib/net/ldap/connection.rb

@@ -141,10 +141,10 @@ def write(packet)
   end
   private :write
 
-  # Internal: Convert `request` and `controls` to a BER data packet with the
-  # next message id and call `#write` on it.
+  # Internal: Convert BER formatted `request` and `controls` to a BER data
+  # packet with the next message id (`#next_msgid`) and call `#write` on it.
   def write_request(request, controls = nil)
-    write([next_msgid, request, controls].compact.to_ber_sequence)
+    write([next_msgid.to_ber, request, controls].compact.to_ber_sequence)
   end
 
   def next_msgid

test/test_ldap_connection.rb

@@ -24,22 +24,22 @@ def test_modify_ops_replace
 
   def test_write_request
     mock = Minitest::Mock.new
-    mock.expect(:write, true, [[1, "request"].to_ber_sequence])
+    mock.expect(:write, true, [[1.to_ber, "request"].to_ber_sequence])
     conn = Net::LDAP::Connection.new(:socket => mock)
     conn.write_request("request")
   end
 
   def test_write_request_with_controls
     mock = Minitest::Mock.new
-    mock.expect(:write, true, [[1, "request", "controls"].to_ber_sequence])
+    mock.expect(:write, true, [[1.to_ber, "request", "controls"].to_ber_sequence])
     conn = Net::LDAP::Connection.new(:socket => mock)
     conn.write_request("request", "controls")
   end
 
   def test_write_request_increments_msgid
     mock = Minitest::Mock.new
-    mock.expect(:write, true, [[1, "request1"].to_ber_sequence])
-    mock.expect(:write, true, [[2, "request2"].to_ber_sequence])
+    mock.expect(:write, true, [[1.to_ber, "request1"].to_ber_sequence])
+    mock.expect(:write, true, [[2.to_ber, "request2"].to_ber_sequence])
     conn = Net::LDAP::Connection.new(:socket => mock)
     conn.write_request("request1")
     conn.write_request("request2")