utils: 'current-source-directory' resolves relative file names at run time.

* guix/utils.scm (absolute-dirname): New procedure.
(current-source-directory): Emit code to use it instead of calling
'search-path'.