From 960d147b02c18888301b05eb9786507dcc5b5b30 Mon Sep 17 00:00:00 2001 From: pcanterino <> Date: Tue, 1 Feb 2005 21:06:04 +0000 Subject: [PATCH] Changed some comments --- devedit.pl | 4 ++-- modules/Command.pm | 7 ++++--- modules/Tool.pm | 3 ++- 3 files changed, 8 insertions(+), 6 deletions(-) diff --git a/devedit.pl b/devedit.pl index eb03292..22dc403 100644 --- a/devedit.pl +++ b/devedit.pl @@ -110,8 +110,8 @@ if(-e clean_path($config->{'fileroot'}.'/'.$file)) $uselist->lock or abort($config->{'errors'}->{'lock_failed'},undef,{USELIST => $uselist->{'listfile'}, LOCK_FILE => $uselist->{'lockfile'}}); $uselist->load; - # Create a hash with data submitted by user - # (some other necessary information will also be included) + # Create a hash containing data submitted by the user + # (some other necessary information are also included) my %data = (physical => $physical, virtual => $virtual, diff --git a/modules/Command.pm b/modules/Command.pm index 4cea462..8ffc765 100644 --- a/modules/Command.pm +++ b/modules/Command.pm @@ -374,7 +374,7 @@ sub exec_endedit($$) if(file_save($physical,\$content)) { - # Saving of the file was successful! + # The file was successfully saved! return devedit_reload({command => 'show', file => $dir}); } @@ -464,7 +464,7 @@ sub exec_mkdir($$) # exec_upload() # -# Upload a file +# Process a file upload # # Params: 1. Reference to user input hash # 2. Reference to config hash @@ -921,7 +921,8 @@ sub exec_about($$) $tpl->fillin('PID',$$); - # Check if the functions getpwuid() and getgrgid() are available + # The following information is only available on systems supporting + # users and groups if($users) { diff --git a/modules/Tool.pm b/modules/Tool.pm index 1f72b75..2347445 100644 --- a/modules/Tool.pm +++ b/modules/Tool.pm @@ -272,7 +272,8 @@ sub mode_string($) # upper_path() # -# Cut away the last part of a path +# Remove the last part of a path +# (the resulting path contains a trailing slash) # # Params: Path # -- 2.34.1