(init_buffer): Set current_buffer->directory to a