experimental git support (needs a little more work), thanks Andrew Replogle

applications/admin/views/default/git_pull.html

@@ -0,0 +1,9 @@
+{{extend 'layout.html'}}
+
+<center>
+<h2>{{=T('This will pull changes from the remote repo for application "%s"?', app)}}</h2>
+<table><tr>
+<td>{{=FORM(INPUT(_type='submit',_name='cancel',_value=T('Cancel')))}}</td>
+<td>{{=FORM(INPUT(_type='submit',_name='pull',_value=T('Pull')))}}</td>
+</tr></table>
+</center>

applications/admin/views/default/git_push.html

@@ -0,0 +1,6 @@
+{{extend 'layout.html'}}
+
+<h2>{{=T('This will push changes to the remote repo for application "%s".', app)}}</h2>
+<center>
+{{=form}}
+</center>

applications/admin/views/default/site.html

@@ -34,6 +34,10 @@
         {{=button(URL('remove_compiled_app',args=a), T("Remove compiled"))}}
         {{pass}}
         {{pass}}
+	{{if os.path.exists(os.path.join(apath(r=request),a,'.git')): }}
+        {{=button(URL('git_pull',args=a), T("Git Pull"))}}
+        {{=button(URL('git_push',args=a), T("Git Push"))}}
+        {{pass}}
         {{if a!=request.application:}}
         {{=button(URL('uninstall',args=a), T("Uninstall"))}}
         {{=button_enable(URL('enable',args=a), a)}}
@@ -117,16 +121,18 @@
             </tr>
         <tr>
               <td>
-        {{=LABEL(T("Get from URL:"), _for='upload_url')}}
+		{{=LABEL(T("Get from URL:"), _for='upload_url')}}
           </td>
           <td>
-        <input id="appurl" name="appurl" type="text" id="upload_url"/>
+        <input id="appurl" name="appurl" type="text" id="upload_url"/><br/>
           </td>
         </tr>
         <tr>
-          <td></td>
-              <td>
-        <input type="checkbox" name="overwrite_check" id="upload_overwrite" />
+          <td>
+	    ({{=T('can be a git repo')}})
+	  </td>
+          <td>
+            <input type="checkbox" name="overwrite_check" id="upload_overwrite" />
         {{=LABEL(T("Overwrite installed app"), _for='upload_overwrite')}}
           </td>
         </tr>