Fixed a small bug found by harbour-QA