Search for text in SQL database procs/functions

declare @searchString varchar(100)
Set @searchString = '%word_to_find%'
SELECT Distinct SO.Name
FROM sysobjects SO (NOLOCK)
INNER JOIN syscomments SC (NOLOCK)
on SO.Id = SC.ID
AND SC.Text LIKE @searchString
ORDER BY SO.Name