Index: openacs-4/packages/categories/www/cadmin/category-link-add.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/categories/www/cadmin/category-link-add.tcl,v
diff -u -N -r1.7.2.1 -r1.7.2.2
--- openacs-4/packages/categories/www/cadmin/category-link-add.tcl	15 Mar 2019 11:41:37 -0000	1.7.2.1
+++ openacs-4/packages/categories/www/cadmin/category-link-add.tcl	29 Nov 2019 14:32:04 -0000	1.7.2.2
@@ -25,8 +25,8 @@
 set page_title "Select target to add a link to category \"$tree_name :: $category_name\""
 
 set context_bar [category::context_bar $tree_id $locale \
-                     [value_if_exists object_id] \
-                     [value_if_exists ctx_id]]
+                     [expr {[info exists object_id] ? $object_id : ""}] \
+                     [expr {[info exists ctx_id] ? $ctx_id : ""}]]
 lappend context_bar \
     [list [export_vars -no_empty -base category-links-view {category_id tree_id locale object_id  ctx_id}] "Links to $category_name"] \
     "Select link target"