Fisheye: Tag 1.1 refers to a dead (removed) revision in file `openacs-4/packages/dotlrn-assessment/tcl/test/dotlrn-assessment-test-procs.tcl'.
Fisheye: No comparison available.  Pass `N' to diff?
Fisheye: Tag 1.1 refers to a dead (removed) revision in file `openacs-4/packages/dotlrn-bm/tcl/test/dotlrn-bm-test-procs.tcl'.
Fisheye: No comparison available.  Pass `N' to diff?
Index: openacs-4/packages/dotlrn-calendar/tcl/test/dotlrn-calendar-test-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-calendar/tcl/test/dotlrn-calendar-test-procs.tcl,v
diff -u -r1.1.2.1 -r1.1.2.2
--- openacs-4/packages/dotlrn-calendar/tcl/test/dotlrn-calendar-test-procs.tcl	5 Sep 2019 13:17:48 -0000	1.1.2.1
+++ openacs-4/packages/dotlrn-calendar/tcl/test/dotlrn-calendar-test-procs.tcl	10 Sep 2019 09:20:40 -0000	1.1.2.2
@@ -22,7 +22,7 @@
         @creation-date 2019-09-05
 } {
     aa_equals "Package key" "[dotlrn_calendar::package_key]" "calendar"
-    aa_equals "My Package key" "[dotlrn_calendar::my_package_key]" "dotlrn_calendar"
+    aa_equals "My Package key" "[dotlrn_calendar::my_package_key]" "dotlrn-calendar"
     aa_equals "Applet key" "[dotlrn_calendar::applet_key]" "dotlrn_calendar"
 }
 
Fisheye: Tag 1.1 refers to a dead (removed) revision in file `openacs-4/packages/dotlrn-chat/tcl/test/dotlrn-chat-test-procs.tcl'.
Fisheye: No comparison available.  Pass `N' to diff?
Fisheye: Tag 1.1 refers to a dead (removed) revision in file `openacs-4/packages/dotlrn-dotlrn/tcl/test/dotlrn-dotlrn-test-procs.tcl'.
Fisheye: No comparison available.  Pass `N' to diff?
Fisheye: Tag 1.1 refers to a dead (removed) revision in file `openacs-4/packages/dotlrn-evaluation/tcl/test/dotlrn-evaluation-test-procs.tcl'.
Fisheye: No comparison available.  Pass `N' to diff?
Fisheye: Tag 1.1 refers to a dead (removed) revision in file `openacs-4/packages/dotlrn-faq/tcl/test/dotlrn-faq-test-procs.tcl'.
Fisheye: No comparison available.  Pass `N' to diff?
Fisheye: Tag 1.1 refers to a dead (removed) revision in file `openacs-4/packages/dotlrn-forums/tcl/test/dotlrn-forums-test-procs.tcl'.
Fisheye: No comparison available.  Pass `N' to diff?
Index: openacs-4/packages/dotlrn-fs/tcl/test/dotlrn-fs-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-fs/tcl/test/dotlrn-fs-procs.tcl,v
diff -u -r1.4.2.2 -r1.4.2.3
--- openacs-4/packages/dotlrn-fs/tcl/test/dotlrn-fs-procs.tcl	3 Apr 2019 07:53:09 -0000	1.4.2.2
+++ openacs-4/packages/dotlrn-fs/tcl/test/dotlrn-fs-procs.tcl	10 Sep 2019 09:20:40 -0000	1.4.2.3
@@ -82,6 +82,25 @@
         }
 }
 
+aa_register_case \
+    -cats {api smoke production_safe} \
+    -procs {
+        dotlrn_fs::package_key
+        dotlrn_fs::my_package_key
+        dotlrn_fs::applet_key
+    } \
+    dotlrn_fs__keys {
+
+        Simple test for the various dotlrn_fs::..._key procs.
+
+        @author Héctor Romojaro <hector.romojaro@gmail.com>
+        @creation-date 2019-09-10
+} {
+    aa_equals "Package key" "[dotlrn_fs::package_key]" "file-storage"
+    aa_equals "My Package key" "[dotlrn_fs::my_package_key]" "dotlrn-fs"
+    aa_equals "Applet key" "[dotlrn_fs::applet_key]" "dotlrn_fs"
+}
+
 # Local variables:
 #    mode: tcl
 #    tcl-indent-level: 4
Fisheye: Tag 1.1 refers to a dead (removed) revision in file `openacs-4/packages/dotlrn-news/tcl/test/dotlrn-news-test-procs.tcl'.
Fisheye: No comparison available.  Pass `N' to diff?
Fisheye: Tag 1.1 refers to a dead (removed) revision in file `openacs-4/packages/dotlrn-static/tcl/test/dotlrn-static-test-procs.tcl'.
Fisheye: No comparison available.  Pass `N' to diff?