--- a/R/unix/progress.bar.R
+++ b/R/unix/progress.bar.R
@@ -1,3 +1,19 @@
+#  R package rjags file R/unix/progress.bar.R
+#  Copyright (C) 2009-2013 Martyn Plummer
+#
+#  This program is free software; you can redistribute it and/or
+#  modify it under the terms of the GNU General Public License version
+#  2 as published by the Free Software Foundation.
+#
+#  This program is distributed in the hope that it will be useful,
+#  but WITHOUT ANY WARRANTY; without even the implied warranty of
+#  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+#  GNU General Public License for more details.
+#
+#  A copy of the GNU General Public License is available at
+#  http://www.r-project.org/Licenses/
+#
+
 updatePB <- function(start.iter, end.iter, adapting)
 {
   tcltk::tkProgressBar(title=ifelse(adapting, "Adapting","Updating"),