shell_functions

diff --git a/etc/profile.d/functions b/etc/profile.d/functions
index ab01a0e8ee6888f791d015189a7933b1b3ee74dc..e5ff228f4d7cda0863e040b7e32a435ee98c51af 100644 (file)
--- a/etc/profile.d/functions
+++ b/etc/profile.d/functions
@@ -46,7 +46,8 @@ shell_help_noarg() {
 }
 
 shell_functions() {
-  set | perl -ne '/^([a-z][\w_-]+) \(\)\s*$/ and print "$1\n"'
+# NB 15.02.16   set | perl -ne '/^([a-z][\w_-]+) \(\)\s*$/ and print "$1\n"'
+  typeset -f | perl -ne '/^([a-z][\w_-]+) \(\)\s*$/ and print "$1\n"'
   #set | perl -ne '/^([a-z][\w_-]+) \(\)\s*$/ and print "$1 "' | perl -pe 's/\s+$//'
 }