Author: sparky                       Date: Tue Apr 18 18:37:56 2006 GMT
Module: vfmg                          Tag: HEAD
---- Log message:
- fixed DR17 speedup

---- Files affected:
vfmg:
   vfmg (1.87 -> 1.88) 

---- Diffs:

================================================================
Index: vfmg/vfmg
diff -u vfmg/vfmg:1.87 vfmg/vfmg:1.88
--- vfmg/vfmg:1.87      Tue Apr 18 19:31:36 2006
+++ vfmg/vfmg   Tue Apr 18 20:37:51 2006
@@ -954,7 +954,9 @@
                        {
                                if ( -r $icon ) {
                                        (my $md5 = `md5sum $icon`) =~ 
s/\s+.*//s;
-                                       $icon_exists = 1 if ( $md5 eq 
$$e{IconMD5} );
+                                       if ( defined $$e{IconMD5} ) {
+                                               $icon_exists = 1 if ( $md5 eq 
$$e{IconMD5} );
+                                       }
                                } else {
                                        $icon_exists = 1 unless defined 
$$e{IconMD5};
                                }
@@ -1040,15 +1042,16 @@
                } else {
                        my $subdir = sprintf "%s/%s", $dir, $$d{file};
                        my $file = $subdir . "/.directory.eap";
+                       my $file2 = "$opt{icons_dir}/$$d{file}.eap";
                        mkpath($subdir,0,0700);
                        print ".." if $o_verbose;
                        unless ( $icon_exists ) {
-                               system(@edje, $file);
+                               system(@edje, $file2);
                                print ".." if $o_verbose;
-                               system("enlightenment_eapp",$file,
+                               system("enlightenment_eapp",$file2,
                                        "-set-name",$name);
                        }
-                       
+                       symlink ($file2, $file);
                        print "..DONE\n" if $o_verbose;
                        DR17($menu[$no]{$entry},$subdir,$tab.step,$dr);
                        $dirs .= $$d{file}."\n";
================================================================

---- CVS-web:
    http://cvs.pld-linux.org/vfmg/vfmg?r1=1.87&r2=1.88&f=u

_______________________________________________
pld-cvs-commit mailing list
[email protected]
http://lists.pld-linux.org/mailman/listinfo/pld-cvs-commit

Reply via email to