-(fset 'orig-require (symbol-function 'require))
-
-(defun require (package &optional file)
- "Avoid loading .elc files."
- (let ((filename (concat (symbol-name package) ".el")))
- (condition-case err
- (orig-require package filename)
- (error
- (orig-require package)))))
-