victorg
committed
on 27 Apr 05
typo in package key
/tcl/photo-album-portlet-procs.tcl (+2 -2)
8 8
9 9 namespace eval photo_album_portlet {}
10 10
11 11
12 12 ad_proc -private photo_album_portlet::get_my_name {
13 13 } {
14 14     return "photo_album_portlet"
15 15 }
16 16
17 17
18 18
19 19 ad_proc -private photo_album_portlet::my_package_key {
20 20 } {
21 21     return "photo-album-portlet"
22 22 }
23 23
24 24
25 25
26 26 ad_proc -public photo_album_portlet::get_pretty_name {
27 27 } {
28       return "[_ photo-album-portlet.Photo_Album]"
  28     return "#photo-album-portlet.Photo_Album#"
29 29 }
30 30
31 31
32 32
33 33 ad_proc -public photo_album_portlet::link {
34 34 } {
35 35     return ""
36 36 }
37 37
38 38
39 39
40 40 ad_proc -public photo_album_portlet::add_self_to_page {
41 41     {-portal_id:required}
42 42     {-package_id:required}
43 43     {-param_action:required}
44 44 } {
45 45     Adds a photo-album PE to the given portal.
46 46    
47 47     @param portal_id The page to add self to
48 48     @param package_id The community with the folder