diff --git a/.gitignore b/.gitignore
index a8eee17..32a0fbd 100644
--- a/.gitignore
+++ b/.gitignore
@@ -15,3 +15,9 @@ Makefile.in
 /*.log
 /tests/*.log
 /tests/*.trs
+/examples/download
+/examples/identity
+/examples/identity-bis
+/examples/publish
+/examples/search
+/examples/search-ns
diff --git a/configure.ac b/configure.ac
index 37b1700..0d505a5 100644
--- a/configure.ac
+++ b/configure.ac
@@ -49,4 +49,12 @@ AC_SUBST([GNUNETIDENTITY_LIBDIR])
 AC_CONFIG_FILES([Makefile gnu/gnunet/config.scm])
 AC_CONFIG_FILES([pre-inst-env], [chmod +x pre-inst-env])
 
+dnl The examples.
+AC_CONFIG_FILES([examples/download], [chmod +x examples/download])
+AC_CONFIG_FILES([examples/identity], [chmod +x examples/identity])
+AC_CONFIG_FILES([examples/identity-bis], [chmod +x examples/identity-bis])
+AC_CONFIG_FILES([examples/publish], [chmod +x examples/publish])
+AC_CONFIG_FILES([examples/search], [chmod +x examples/search])
+AC_CONFIG_FILES([examples/search-ns], [chmod +x examples/search-ns])
+
 AC_OUTPUT
diff --git a/examples/download.scm b/examples/download.in
old mode 100755
new mode 100644
similarity index 97%
rename from examples/download.scm
rename to examples/download.in
index 93c3681..c3beb5b
--- a/examples/download.scm
+++ b/examples/download.in
@@ -1,4 +1,4 @@
-#!/usr/bin/guile \
+#!@GUILE@ \
 -e (@\ (gnunet-download)\ main) -L . -s
 !#
 ;;;; Copyright © 2015 Rémi Delrue <asgeir@free.fr>
@@ -67,3 +67,7 @@ the download."
 	  ((equal? status '(#:download #:stopped))
 	   (add-task! (lambda (_)
 			(close-filesharing-service! *fs-handle*)))))))
+
+;; Local Variables:
+;; mode: scheme
+;; End:
diff --git a/examples/identity-bis.scm b/examples/identity-bis.in
old mode 100755
new mode 100644
similarity index 96%
rename from examples/identity-bis.scm
rename to examples/identity-bis.in
index 2ef8f59..cf8d58a
--- a/examples/identity-bis.scm
+++ b/examples/identity-bis.in
@@ -1,4 +1,4 @@
-#!/usr/bin/guile \
+#!@GUILE@ \
 -e (@\ (gnunet-identity)\ main) -L . -s
 !#
 ;;;; Copyright © 2015 Rémi Delrue <asgeir@free.fr>
@@ -47,3 +47,7 @@
 (define (main args)
   (set! *config* (load-configuration "~/.gnunet/gnunet.conf"))
   (call-with-scheduler *config* first-task))
+
+;; Local Variables:
+;; mode: scheme
+;; End:
diff --git a/examples/identity.scm b/examples/identity.in
old mode 100755
new mode 100644
similarity index 96%
rename from examples/identity.scm
rename to examples/identity.in
index 4231543..6041aca
--- a/examples/identity.scm
+++ b/examples/identity.in
@@ -1,4 +1,4 @@
-#!/usr/bin/guile \
+#!@GUILE@ \
 -e (@\ (gnunet-identity)\ main) -L . -s
 !#
 ;;;; Copyright © 2015 Rémi Delrue <asgeir@free.fr>
@@ -47,3 +47,7 @@
 (define (main args)
   (set! *config* (load-configuration "~/.gnunet/gnunet.conf"))
   (call-with-scheduler *config* first-task))
+
+;; Local Variables:
+;; mode: scheme
+;; End:
diff --git a/examples/publish.scm b/examples/publish.in
old mode 100755
new mode 100644
similarity index 99%
rename from examples/publish.scm
rename to examples/publish.in
index d5a55b2..bd1c57b
--- a/examples/publish.scm
+++ b/examples/publish.in
@@ -1,4 +1,4 @@
-#!/usr/bin/guile \
+#!@GUILE@ \
 -e (@\ (gnunet-publish)\ main) -L . -s
 !#
 ;;;; Copyright © 2015 Rémi Delrue <asgeir@free.fr>
@@ -195,3 +195,7 @@ subsystem has been initialized."
     (set! *update-id* (option-ref options 'update-id #f))
     (set! *args*      (option-ref options '()        #f)))
   (call-with-scheduler *config* first-task))
+
+;; Local Variables:
+;; mode: scheme
+;; End:
diff --git a/examples/search-ns.scm b/examples/search-ns.in
old mode 100755
new mode 100644
similarity index 98%
rename from examples/search-ns.scm
rename to examples/search-ns.in
index 0956d9a..648bd14
--- a/examples/search-ns.scm
+++ b/examples/search-ns.in
@@ -1,4 +1,4 @@
-#!/usr/bin/guile \
+#!@GUILE@ \
 -e (@\ (gnunet-search)\ main) -L . -s
 !#
 ;;;; Copyright © 2015 Rémi Delrue <asgeir@free.fr>
@@ -101,3 +101,7 @@
   (when (equal? '(#:search #:stopped) status)
     (add-task!
      (lambda (_) (close-filesharing-service! *fs-handle*)))))
+
+;; Local Variables:
+;; mode: scheme
+;; End:
diff --git a/examples/search.scm b/examples/search.in
old mode 100755
new mode 100644
similarity index 98%
rename from examples/search.scm
rename to examples/search.in
index af4a2ca..7d66c41
--- a/examples/search.scm
+++ b/examples/search.in
@@ -1,4 +1,4 @@
-#!/usr/bin/guile \
+#!@GUILE@ \
 -e (@\ (gnunet-search)\ main) -L . -s
 !#
 ;;;; Copyright © 2015 Rémi Delrue <asgeir@free.fr>
@@ -74,3 +74,7 @@
   (when (equal? '(#:search #:stopped) status)
     (add-task! (lambda (_)
 		 (close-filesharing-service! *fs-handle*)))))
+
+;; Local Variables:
+;; mode: scheme
+;; End: