diff --git a/lisp/thingatpt.el b/lisp/thingatpt.el
index 26e0843..6976769 100644
--- a/lisp/thingatpt.el
+++ b/lisp/thingatpt.el
@@ -585,9 +585,9 @@ thing-at-point-uuid-regexp
 
 ;;  Aliases
 
-(defun word-at-point ()
+(defun word-at-point (&optional no-properties)
   "Return the word at point.  See `thing-at-point'."
-  (thing-at-point 'word))
+  (thing-at-point 'word no-properties))
 
 (defun sentence-at-point ()
   "Return the sentence at point.  See `thing-at-point'."