Implemented a test for the test suite which catches bug #7224 (https://gna.org/bugs/?7224).
Authored by: bugman 2006-09-30
Parent: [r2585]
Child: [r2587]
