(defvar str "foo")
(setq str (concat str "bar"))
str ;=> "foobar"